DS 0 


3 
6 
4 
as 
e 


Aprenda a programar en 
BASIC-MSX 


166 O 


O 0 UN 
DON 


SONY 
MEX ur 


-. APRENDA A PROGRAMAR 


EN BASIC MSX 


-KANBDAHA R 
A ASE 


3% Edición 

(0) 1987 SONY ESPAÑA, S.A. 
Sabino de Arana 42-44 
08028-Barcelona 


Reservados todos los derechos. Ninguna parte de este libro puede ser reproducida 
por ningún medio, sin el permiso previo de SONY ESPAÑA, S.A. 


Dpto. Legal B: 3940-87 
ISBN 84-398-4421-2 
Imprime: Gráficas Signo, S.A. 
Carretera de Cornellá, 140, 22 — Esplugues de Llobregat 
Printed in Spain. Impreso en España. 


MSX es marca registrada de ASCII CORP. 
COD. 21000195 


PROLOGO 


Hasta la aparición del MSX, los ordenadores existentes en el mer- 
cado se caracterizaban por su incompatibilidad. Los programas y 
los distintos periféricos conectables a la unidad central eran sola- 
mente válidos para aquella marca que estaban previstos. 


Esta incompatibilidad era, y es, un grave inconveniente para el 
usuario final, que queda indefenso ante los vaivenes que pueda 
sufrir cada una de estas empresas. 


El MSX ha revolucionado el mercado en este aspecto. Son ya más 
de veinte compañias que han adoptado este standard, dispuestas a 
terminar con la anarquia de lenguajes y de conexión de periféricos 
existentes. 


Se pretende asi ofrecer una ámplia gama de programas, ordenado- 
res y periféricos para que el usuario pueda escoger aquello que 
mejor se adapte a sus necesidades de entre todos los modelos 
existentes, contando con la sguridad de que podrá adquirir progra- 
mas y periféricos de cualquiera de las compañias MSX. 


Pero esta es sólamente una de las ventajas del MSX. 


La segunda, tan importante o más que la primera, es su propia 
potencia. A lo largo de las páginas de este libro se comentan todos 
los comandos del MSX-BASIC para que lo pueda comprobar. 


Se ofrecen, además, una serie de informaciones técnicas de gran 
utilidad para todos aquellos que pretendan aprender programación 
y también para quienes ya desean profundizar en el MSX. 


Se listan, asimismo, una serie de programas con el fin de demostrar 
la sencillez y, al propio tiempo, la potencia del MSX-BASIC. 


Podemos concluir diciendo que las tres caracteristicas que confi- 
guran el MSX son su estandarización de software y hardware, su 
sencillez y su potencia. 


Por ello puede decirse que el MSX está revolucionando la informá- 
tica familiar y abre un nuevo campo en la informática aplicada a la 
educación y a la gestión, permitiendo disponer de un equipo com- 
pleto y potente a un precio muy asequible. 
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1.0. INTRODUCCION 


El BASIC MSX es una versión ampliada del Microsoft Standard Basic 
versión 4.5, e incluye soportes para gráficos, música y diversos peri- 
féricos 


Fue diseñado para seguir el GW-BASIC, estandard en el mundo de los 
microprocesadores de 16 bits. Pero el mayor esfuerzo fue hacer todo 
el sistema lo más flexible y ampliable posible. 


El BASIC MSX trabaja con 14 dígitos para ofrecer doble precisión en 
las funciones matemáticas, por lo que no se generarán más esos 
extraños errores de redondeo que confunden a los usuarios. 


1.1. MODOS DE FUNCIONAMIENTO 


Una vez inicializado el BASIC MSX, aparece rápidamente el OK. 
«OK», indica que el sistema está dispuesto para aceptar cualquier 
comando. Es ahora cuando el BASIC MSX puede ser usado en modo 
directo o indirecto. 


En el modo directo los comandos no están precedidos por número de 
línea y se ejecutan al ser introducidos. Los resultados de operaciones 
aritméticas y lógicas aparecen inmediatamente en la pantalla y son 
almacenados para su uso posterior, pero las instrucciones desapare- 
cen tras su ejecución (no quedan almacenadas en memoria). 


El modo directo es útil para utilizar el BASIC MSX como calculadora, 
para rápidas operaciones que no requieren un programa completo. 


El modo indirecto se utiliza para introducir programas. Las líneas del 
programa están precedidas por números y son almacenadas en me- 
moria. El programa almacenado en memoria será ejecutado al intro- 
ducir el comando RUN. 


1.2. FORMATO DE LAS LINEAS 


En una línea de programa, pueden situarse varias instrucciones, 
siempre que estén separadas por dos puntos: 


10 instrucción BASIC: instrucción BASIC 


Toda linea de programa comienza siempre con un número de línea y 
termina al pulsar RETURN, pudiendo contener un máximo de 255 
caracteres, 
1.2.1. Número de línea 
Cada línea de un programa BASIC MSX, comienza con un 
número. 


Los números de línea indican el orden en que han sido almace- 
nadas en memoria las líneas del programa. 


También son utilizados como referencia en la edición del pro- 
grama y en las sentencias de bifurcación. 


Los números de línea deben estar comprendidos entre O y 
65.529. 


1.3. CONJUNTO DE CARACTERES 
El conjunto de caracteres del BASIC MSX está formado por: caracte- 
res alfabéticos, caracteres numéricos, caracteres especiales y carác- 
teres gráficos. 
Los caracteres alfabéticos son las letras del alfabeto. 


Los caracteres numéricos son los dígitos del 0 al 9. 


Los siguientes caracteres especiales están reconocidos por el BASIC 
MSX: 


Acción 


signo de equivalencia 


suma 
resta 
multiplicación 


Carácter 


Acción 


Él 


ANS 


<V Ap. 


división 

simbolo exponencial o acento 
circunflejo 

paréntesis izquierdo 
paréntesis derecho 
porcentaje 

signo de dólar 
exclamación 

corchete izquierdo 
corchete derecho 
punto o punto decimal 
apóstrofe 

punto y coma 

dos puntos 

and 

signo de interrogación 
menor que 

mayor que 


] signo del yen 


1.4. CONSTANTES 


Las constantes son los valores que el BASIC MSX usa durante la 
ejecución de un programa. Hay dos tipos de constantes: numéricas y 


alfanuméricas (string). 


Una constante alfanumérica es una sucesión de hasta 255 caracteres 


alfanuméricos insertados entre comillas. 


Las constantes numéricas son números positivos o negativos, y no 
pueden contener comas (El punto realiza la función de la coma). Hay 
seis tipos de constantes numéricas: 


1. Constantes enteras: todo número entre -32768 y 32767. Las cons- 


tantes enteras no contienen decimales 


2. Constantes con punto decimal fijo: números reales positivos o 


negativos que contengan decimales. 


3. Constantes con punto decimal, número positivos o negativos en 
forma exponencial. El margen para estas constantes está entre 
10% y 10+8 


235.988 E-7 = 0.0000235988 
2359 E6 = 2359000000 


4. Constantes hexadecimales: números hexadecimales, con el pre- 
fijo 8H 


8H76 
8 H32F 


5. Constantes octales: números octales, con el prefijo 406 8 


2.0347 
8 347 


6. Constantes binarias: números binarios, con el prefijo 8 B 


8801110110 
8.B11100111 


1.4.1. Constantes numéricas de simple y doble precisión 


Las constantes numéricas de simple precisión están almace- 
nadas con 6 dígitos y son impresas con hasta 6 digitos de 
precisión. Las constantes numéricas de doble precisión están 
almacenadas con 14 digitos y son impresas con hasta 14 dígi- 
tos de precisión. 


Una constante de simple precisión es toda constante numérica 
que cumple una de las siguientes caracteristicas: 


1. Forma exponencial usando E 
2. Signo de admiración (!) 


-1,09 E-06 
22.5! 


Una constante de doble precisión es toda constante numérica 
que cumple una de las siguientes características: 


1. Todo número no exponencial (usando E) sin signos de 
admiración. 

2. Número exponencial usando la letra D 

3. Número con el signo * 


3489 
345962811 
-1.09432 D-06 
3489.0 + 


1.5. VARIABLES 


Las variables son nombres usados para representar valores. El valor 
de una variable puede ser asignado explícitamente por el programa- 
dor o puede ser el resultado de unos cálculos en el programa. Al 
inicializar el sistema, todas las variables tendrán asignado el valor 
cero (variables numéricas) ó «null» (variables altanuméricas). 


1.5.1. Nombres de variables y Declaración de caracteres 


Los nombres de variables en el BASIC MSX pueden ser de 
cualquier longitud, pero solo son significativos 2 caracteres. 
Estas variables pueden contener letras y números pero el pri- 
mer carácter debe ser siempre una letra. 


Una variable no puede ser una palabra reservada y no puede 
contener palabras reservadas. Las palabras reservadas inclu- 
yen todos los comandos del BASIC MSX, nombres de funcio- 
nes, ordenes y nombres operativos. Por ejemplo, si una varia- 
ble comienza por FN, se supondrá que es la llamada de una 
función definida por el usuario y no el nombre de una variable. 


Las variables pueden representar un valor numérico o una 


cadena de caracteres. Las variables alfanuméricas se repre- 
sentan con el simbolo $ como último carácter: 


AS 'ENTAS 


Las variables numéricas pueden ser números enteros, de sim- 
ple o doble precisión. Los simbolos que identifican esas varia- 


bles son: 
% variable entera 
1 variable de simple precisión. 
X% variable de doble precisión. 
Pis doble precisión 
Minimum! — simple precisión 
Limit % variable entera 
N5 variable alfanumérica 
ABC doble precisión 


Existe un segundo método por el cual pueden definirse los 
tipos de variables utilizando las sentencias DEFINT, DEFSTR, 
DEFSGN y DEFDBL en el transcurso de un programa. 

1.5.2. Variables matriciales (variables subindicadas). 


El BASIC MSX, permite trabajar con variables matriciales para 
designar elementos de una matriz. 


Las matrices deben declararse por medio de una sentencia de 


dimensionado (DIM) en el programa, pero ello no es impres- 
cindible si los subindices no superan el rango de O a 10. 


El nombre de una variable con subíndice es siempre variable y 
va seguido por una o más expresiones entre paréntesis. La 
expresión entre paréntesis indica la posición de los datos en la 
Matriz. 


A$ (4): variable subindicada de una dimensión. 
A (2,3): variable subindicada de dos dimensiones. | 


A (2,3,.....6): variable subindicada de varias dimensiones. 


Una matriz puede tener hasta 255 dimensiones. El número 
máximo de elementos está determinado por la capacidad de 
memoria. 


1.5.3. Requisitos de espacio 


La siguiente tabla, indica el número de bytes ocupados por los 
valores representados en los distintos tipos de variables: 


Variables numéricas: Tipo Bytes 
entera 2 
simple precisión 4 
doble precisión 8 

Matrices: entera 2 por elemento 
simple precisión 4 por elemento 
doble precisión 8 por elemento 


Variables alfanuméricas: 3 bytes más el contenido de la cadena 


1.6. CONVERSION DE TIPOS 


Cuando es necesario el BASIC MSX convierte una constante numé- 
rica de un tipo en otra. He aquí unos ejemplos: 


1. Si una constante numérica de un tipo se iguala a una variable 
numérica distinta, el número será almacenado como se indica en 
la variable. 


10A % = 23,42 
20 PRINTA % 


RUN 
23 


Si una variable string se iguala un valor numérico o viceversa, apare- 
cerá el siguiente mensaje de error: “Type mismatch". 


2. Durante el cálculo de una operación todos los operandos son 
convertidos a un único grado de precisión y lo mismo sucede con 
el resultado. 


ps 
10D = 6/7! La operación y resultado 
20 PRINTD son en doble precisión. 
RUN 
.85714285714286 
10D! = 6/7 La operación se ha hecho 
20 PRINT D! en doble precisión pero el 
RUN resultado aparece en D!, con 
. 857143 simple precisión y 

redondeado. 


3. Los operandos pueden ser convertidos en enteros y obtener un 
resultado en números enteros. Los operandos deben estar 
comprendidos entre —32768 y 32767 para que no exista un error 
de «overflow». 


4. Cuando un valor con punto decimal flotante se convierte en un 
entero, la parte decimal desaparece. 


10C% = 55.88 
20 PRINTC % 
RUN 


55 


5. Si una variable de doble precisión se asigna a un valor de simple 
precisión solo serán válidos los primeros 6 digitos. 


10 A! = SQR (2) 
20B=A! 


30 PRINTA!, B 
RUN 
1.41421 1.41421 


1.7. EXPRESIONES Y OPERADORES 


Una expresión puede ser una cadena o una constante numérica, una 
variable, una combinación de constantes y variables con operandos 
que producen un valor. 


Los operadores del BASIC MSX pueden ser divididos en 4 clases: 
aritméticos, relacionales, lógicos y funcionales. 


1.7.1. Operadores aritméticos 


Operador Operación Expresión 
A Exponencial 
cal Negación 
Pl Multiplicación, División 
a Adición, sustracción 


Para cambiar el orden de realización de las operaciones, se 
usa el paréntesis. 


Las operaciones en el interior del paréntesis se realizan en 
primer lugar. Dentro del paréntesis, se mantiene el orden usual 
de las operaciones: multiplicación y división en primer lugar y 
tras estas, suma y resta. 


1.7.1.1. División entera y Resto 


Dos operandos adicionales están disponibles en el 
BASIC MSX 


La división entera se indica con el símbolo de Yen. Los 
operandos se convierten a enteros (entre —32768 y 
32767) antes de efectuar la división y el cociente es 
redondeado a entero, 


MOD, da el valor entero del resto de la división. 


1.7.1.2. Overflow y división por cero 
Si durante el cálculo de una operación, se encuentra 
la división por cero aparece el mensaje de error «Divi- 
sión by zero» y termina la ejecución del programa. 
Asimismo, cuando se produce una sobrecarga de da- 
tos aparece el mensaje de error «Overtlow». 
1.7.2. Operadores relacionales 


Son usados para comparar dos valores, El resultado de la 
comparación es verdadero (—1) o falso (0) 


a 


Igualdad 
Desigualdad 


Menor que 
Mayor que 
Menor o igual que 
Mayor o igual que 


El signo igual se usa también para asignar un valor a una 
variable. 


Cuando se combinan operadores aritméticos y relacionales en 
Una expresión, el aritmético se ejecutará siempre en primer 
lugar. 


6 


En primer lugar se realizarán las operaciones: X + Y y (T-1)/2, 
luego se compararán los resultados obtenidos 


pe 1.7.3. Operadores lógicos 


Realizan operaciones lógicas, bit a bit. El resultado puede ser 
cierto (1) o falso (0). En una expresión, las operaciones lógicas 
son ejecutadas tras las aritméticas y las relacionales. La fun- 
ción que realizan los operadores lógicos NOT, AND, OR, XOR, 
EQU e IMP se resume en la siguiente tabla: 


Operadores lógicos del BASIC MSX. 


NOT E NOT X 

pS 1 o 

- 0 1 

d AND X Y X AND Y 
1 1 1 
1 0 o 
0 1 0 

S 0 o 0 

ñ OR E Ey X OR Y 
1 1 1 
1 0 1 
o 1 1 
0 0 0 

- XOR a ye XXOR Y 
1 1 o 
1 o 1 

- 0 1 1 

e 0 o 0 


EQU Xx Y XEQV Y 
1 1 i 
1 0 0 
0 1 o 
0 0 1 
IMP 10 Y XIMP Y 
1 1 1 
1 0 10) 
0 1 1 
0 0 1 


Así como los operadores relacionales pueden ser usados para 
tomar decisiones base al programa efectuado, los operadores 
lógicos pueden conectar dos o más relacionales y dar un valor 
vedadero o falso para ser usado en una decisión. 


IF.” D<200ANDF < 40 THEN 80 
IF. 1>100RK>0THEN 50 


IF. NOT P THEN 100 


63 AND 16 = 16 


15AND14 =14 


—1AND8=B 


40R2=6 


63 = binario 111111 
16 = binario 10000 
asi, 63 AND 16 = 16 (binario, 10000) 


15 = binario 1111 
14 = binario 1110 
asi, 15 AND 14 = 14 (binario 1110) 


—1 = binario 1111111111111111 
8 = binario 1000 
así, —1AND 8 = 8 (binario 1000) 


4 = binario 100 
2 = binario 10 
así, 40R 2 = 6 (binario 110) 


CAU AMERO 


IA 


( 


100R10=10  10= binario 1010 
así 1010 OR 1010 = 1010 


—1 = binario 1111111111111111 


—2 = binario 111111111111111 
así —10R—2 = —1 (binario 1111111111111111) 
NOT X =—(x-+1) 


1.7.4. Operadores funcionales 
El BASIC MSX, tiene funciones intrínsecas residente en el 
sistema, como SQR (raíz cuadrada) ó SIN (seno). También 


pueden definirse funciones escritas por el programador con el 
comando. DEF FN. 


1.7.5. Operaciones con cadenas (strings) 


Los strings pueden ser encadenados usando el signo + 


10A$ = “FILE”: BS = “NAME” 
20 PRINT AS + BS 

30 PRINT "NEW" + AS + B$ 
RUN 

FILE NAME 

NEW FILENAME 


Los strings pueden ser comparados usando los mismos signos 
de comparación que los usados con números 


Las comparaciones entre strings, se efectúan carácter a ca- 
rácter utilizando el código ASCII. Si todos los códigos ASCII 


son iguales, los string son iguales. Si durante la comparación 
de strings se llega al final de uno de ellos, el string más corto 
será el más pequeño. Los espacios en blanco son significati- 
vOS. 


"A" <"AB” 
“FILENAME” = “FILENAME” 
“Xen > “Xx =" 


CSC 
"kg" <"Ke" 
“SMYTH"<""SMYTHE" 

BS < "9/12/83" donde B$ = "8/12/89" 


Las comparaciones de strings pueden ser usadas para com- 
probar el valor de un string ó para alfabetizar strings. Todas las 
constantes utilizadas en las expresiones de comparación de- 
ben ir entre comillas. 


1.8. PROGRAMA EDITOR 


El programa editor, permite al usuario realizar todos los cambios 
necesarios dentro del programa (borrar o añadir líneas de programa, 
insertar instrucciones, ....) utilizando para ello los cursores y las teclas 
INSERT (insertar) y DELETE (borrado). El usuario puede situarse 
rápidamente en cualquier punto de la pantalla y hacer las correccio- 
nes necesarias. 


Programas 


El Editor de pantalla está en funcionamiento continuamente desde la 
aparición de «OK» hasta que se ejecuta un programa mediante RUN. 
El Editor procesa todas las líneas de texto introducidas, conside- 
rando una línea de programa toda aquella que comienze por un 
número. 


Si se intenta borrar una línea inexistente aparecerá el mensaje de 
error: «Undefined line number». 


ED El Editor procesará los comandos del programa en los siguientes 


casos: 


. Adición de una nueva línea al programa: El número de líneas 
debe estar comprendido entre O y 65529 y debe ir seguido de un 
carácter como mínimo, 


2. Modificación de una línea ya existente: la linea existente queda 
reemplazada por el nuevo texto introducido. 


3. Borrado de una línea: Se produce si la nueva línea contiene sólo 
el número de línea que se desea borrar. 


4. Se produce un error. 


Si se pretende introducir una nuéva línea de programa y no hay 
suficiente espacio en memoria, se imprimirá el mensaje de eror «Out 
of memory». 


Una linea de programa puede contener varias instrucciones, siempre 
que esten separadas por dos puntos (:). El número máximo de carac- 
teres por línea de programa es 250. 


Edición de Programas 


Mediante el comando LIST nos apareceran todas las instrucciones 
del programa, pudiendo así ser editadas. El texto puede ser modifi- 
cado moviendo el cursor hasta el lugar donde se precisa hacer el 
cambio. Esta modificación puede realizarse efectuando una de las 
siguientes acciones: 


1. Escribiendo directamente sobre el carácter equivocado. 
2. Borrando los caracteres a la derecha del cursor, 

3. Borrando los caracteres a la izquierda del cursor. 

4. Insertando caracteres. 

5. Añadiendo caracteres al final de la línea. 


Los cambios en una línea quedan grabados cuando se pulsa la techa 
RETURN. 


Funciones del editor de pantalla 


La siguiente tabla muestra los códigos hexadecimales del BASIC MSX 


Tabla 1. Funciones del control del BASIC MSX. Pulsando a un tiempo 
latecha CTRL y otra determinada, se ejecuta una operación especial. 


Código 
hexadecimal 


01 quid 
02 Mueve el cursor al principio de la palabra precedente. 


CTRL + | Operación realizada 


m> 


Abandona la espera de un input y la numeración 
automática de líneas. 

Borra texto entre el cursor y el final de la línea. 
Mueve el cursor al principio de la palabra siguiente. 
Sonido Bip. 

Misma función que tecla BS. 

Misma función que tecla TAB. 

Mueve el cursor a la linea posterior. 

Misma función que tecla HOME. 

Limpia pantalla. 

Misma función que tecla RETURN. 

Mueve el cursor a la posición posterior a la del último 
carácter de la linea. 


Misma función que tecla INS 


Borra los caracteres de la linea hasta la posición del cursor. 


Misma función que tecla SELECT. 
Misma función que tecla ESC. 
Mueve el cursor a la derecha. 
Mueve el cursor a la izquierda. 
Mueve el cursor arriba. 

Mueve el cursor abajo. 


LT STN<xXSE<CANDODVO ZZNACTIONMO O 


Funciones de teclas especiales 


Tecla TAB: Mueve el cursor 8 posiciones a la derecha, Todos los 


caracteres existentes en esas posiciones son borrados. 


Tecla RETURN: Debe pulsarse siempre que se haya terminado de 


entrar una línea. 


Tecla ESC: La función de esta tecla viene determinada por el sof- 
tware utilizado. Para el BASIC MSX, no tiene utilidad 
concreta. 


Tecla STOP: Al presionar la tecla se interrumpe la ejecución de un 
programa o de un listado. Al presionarla de nuevo, se 
reanuda la ejecución. Pulsando al mismo tiempo 
CTAL, y STOP se termina la ejecución del programa 
con el siguiente mensaje Break in (n* instrucción). 


Tecla SELECT: La función de esta tecla viene determinada por el 
software utilizado. Para el BASIC MSX, no tiene 
utilidad concreta. 


Tecla INSERT: Al pulsarla, se reduce el tamaño del cursor y pueden 
introducirse los caracteres deseados en la posición 
del cursor, mientras los caracteres a la derecha del 
mismo van desplazándose a medida que se introdu- 
cen los nuevos. Pulsando la tecla INSERT de nuevo, 
el cursor vuelve a su posición normal y termina la 
función de inserción. Pulsando las teclas de movi- 
miento del cursor o pulsando RETURN, también ter- 
mina la función de inserción. 


Tecla HOME: Mueve el cursor al extremo superior izquierdo de la 
pantalla. 


Tecla DEL: Borra el carácter situado en la posición del cursor. Los 
caracteres siguientes se desplazan una posición a la 
izquierda. 


Tecla BS: Al pulsarla, el cursor se desplaza a su izquierda, borrando 
el carácter que esté en esa posición. 


Tecla SHIFT: Pulsándola al mismo tiempo que cualquier tecla, apa- 
rece en pantalla el símbolo superior izquierdo de la 
tecla en cuestión. 


Tecla CAP: Las letras que aparecen en pantalla son mayúsculas, 
pero los números y símbolos no varían. 


Tecla CODE: Pulsando CODE y cualquier tecla, aparece el simbolo 
inferior izquierdo de la tecla, Si pulsamos, además, 
SHIFT, aparece el símbolo superior izquierdo. E 


Tecla GRAPH: Pulsándola al mismo tiempo que cualquiertecla, apa- 
rece el simbolo inferior derecho de la tecla. Si pulsa- 
mos además, SHIFT, aparece el simbolo superior de- 
recho. 


1.9. TECLAS DE FUNCION 


El BASIC MSX, dispone de 10 funciones predefinidas en las 
teclas de función F1/F10. El contenido de estas teclas se visua- 
liza en el margen inferior de la pantalla pudiendo ser reprogra- 
madas mediante el comando KEY. 


Las funciones predefinidas son: 


A 


C 


SEGUNDA PARTE 


COMANDOS, SENTENCIAS 
Y FUNCIONES DEL BASIC MSX 


BO PODIDO SOSA 


| y q 
A. 1 
| ASS 
) A 


| , 
| 
| 
| 
y 
| 


A 
FA 


E 


1. COMANDOS DE AYUDA AL PROGRAMADOR 


e AUTO 

e DELETE 
e LIST 

e LLIST 

e NEW 

e RENUM 
e KEY LIST 


AUTO < num. línea>, <incremento> 
Numera automáticamente las lineas de un programa. 


e < núm. línea>: linea de inicio del programa. 
e < incremento>: salto entre líneas. 


AUTO empieza la numeración en <núm. linea> y va numerando las 
siguientes según el valor de <incremento> 


Si AUTO genera un número de línea utilizado anteriormente con otra 
instrucción, aparecerá un asterisco. (*) Pulsando RETURN, conservara 
el contenido de la línea y generara una nueva. De lo contrario cualquier 
entrada que se efectúe en esa línea, anulara la anterior. 


Para anular el comando AUTO, pulsar CTRL - STOP ó CTRL-C. EM 


AUTO: Numera desde la línea 10 con incrementos de 10: 
0 
20 
30 


PA | 
AUTO 120: Numera desde la línea 120 con incrementos de 10: 


120 


AUTO 100,5: Numera desde la línea 100 con incrementos de 5: 
100 
105 
110 


AUTO,5: Numera desde la linea O, con incrementos de 5: 
0 
5 
10 


DELETE < núm. línea a> —<núm. línea b> 


Borra las lineas de programa comprendidas entre <núm, línea 
a> y <núm. línea b>. 


e <núm. línea a>: línea de inicio de borrado 
e <núm. línea b>: última línea a borrar. 


Si el número de línea especificado en <núm. línea b> no existe en el 
programa, se producirá el error: «Illegal function call». 


DELETE 10-60: Borra desde la línea 10 hasta la 60. (ambas inclusive). 


DELETE 20: Borra la línea 20. 


NOTA.- También puede borrar una sola linea, escribiendo el núm, de 
línea y pulsando RETURN: 


20 (RETURN). 


LIST <n? línea a> - <n* línea b> 
Lista el programa por pantalla. 


e <n” línea a>: línea de inicio del listado. 
e <n? línea b>: línea final del listado. 


Podemos detener momentáneamente el listado, pulsando STOP. Pul- 
sando STOP de nuevo, continuará el listado. 


Para anular la función LIST, pulsar CTRL-STOP. 


LisT : lista todo el programa. 

LIST 10 : lista la línea 10 del programa, 

LIST 10-50 : lista desde la línea 10 hasta la 50. 
(ambas inclusive). 


LIST -50 : lista hasta la linea 50. 
LIST 50- : lista desde la linea 50 hasta el final del 
programa, 


LLIST <n" línea a> - <n* línea b> 
Lista el programa por impresora. Funciona igual que LIST. (ver LIST). 


NEW Borra el contenido de la memoria RAM de usuario. 


RENUM <n? línea nuevo>, <n” línea actual>, <incremento> 
Cambia la numeración de las líneas de un programa. 


e <n” línea nuevo>: línea inicial de la nueva numeración. 

e <n” linea actual>: linea inicial de la numeración actual. 

e <incremento>: Salto entre lineas que se utilizará en la nueva nume- 
ración. Si no se especifica, será 10. 


RENUM cambia también las referencias de los números de línea que 
acompañan a GOTO, GOSUB, THEN, ELSE, ON GOTO, ON GOSUB y 
ERL. 


RENUM : Renumera el programa desde la linea 
10 con incrementos de 10. 


RENUM 1000 : Renumera y traslada el programa 
a partir de la línea 1000 con 
incrementos de 10. 


RENUM 100, 60, 5 : Traslada a la línea 100 numerando 
con incrementos de 5, el programa que 
estaba en la línea 60: 


10 REM $ EJEMPLO RENUM $ 
20 PRINT “HIT BIT” 

30 PRINT “BASIC” 

50 PRINT “MSX” 

60A=8 

7OPRINTA 

77B=10 

85 PRINT B 

90 GOTO 70 


RENUM 1000, 60, 5 


10 REM $ EJEMPLO RENUM $ 
20 PRINT “HIT BIT" 

30 PRINT “BASIC” 

50 PRINT “MSX" 

1000A = 8 

1005 PRINTA 

10108 =10 

1015 PRINTB 

1020 GOTO 1005 


REM <comentarios> 
Es un comando no ejecutable por el ordenador que permite hacer 
comentarios dentro de un programa. 


*e<comentarios>: Comentarios introducidos para diferenciar las 
distintas partes de un programa, siendo útil únicamente en los lista- 
dos ya que REM no es ejecutado por el ordenador. 


10 REM PROGRAMA PRINCIPAL 
100 REM SUBRUTINA 1 
600 REM CONTADOR 


KEY LIST 


Lista el contenido de todas las teclas de función (F1-F10). 


KEY LIST (RETURN) 
color 
auto 
goto 
list 


Color corresponde a la tecla F1, Auto a F2, Goto a F3 y así sucesiva- 
mente. hasta F10. 


2. COMANDOS DE PROGRAMACION 


e RUN 

e STOP 

e CONT 

e END 

e TRON 

e TROFF 

e FOR/NEXT 

e GOTO 

e IF... THEN.. ELSE 
e IF.. GOTO.. ELSE 
e GOSUB 

e RETURN 

e ON... GOTO 

e ON... GOSUB 


RUN <n' línea> 
Ejecuta el programa a partir del número de líneas especificado. 


e<n" linea> : número de linea donde empezará la ejecución del pro- 
grama. Si no se especifica, ejecutará el programa desde el 
principio. 


RUN : Ejecuta todo el programa. 
RUN 120 : Ejecuta el programa a partir de la línea 120. 


mn  ————— 


sToP 
Detiene la ejecución de un programa y se pone a la espera de nuevas 
órdenes, 


Cuando el ordenador encuentra un STOP, imprimirá el siguiente men- 
saje: 


BREAK IN x (x es el núm. de línea donde se encuentra el STOP). 


A diferencia del comando END, STOP no cierra ficheros. 


La ejecución del programa puede continuar utilizando el comando 
CONT. (ver CONT.). 


CONT 
Continua la ejecución de un programa después de un BREAK o STOP. 
No podrá utilizarse en los siguientes casos: 


1. Cuando la interrupción sea debida a un error. (ver código de Errores). 
2, Cuando se efectúe cualquier modificación dentro del programa. 
3. Cuando se incorpore una nueva línea en el programa. 


Al utilizar CONT en cualquiera de estos casos se imprimirá el mensaje 
de error: «Can't continue». 


END 
Termina la ejecución de un programa, cierra todos los ficheros y se 
pone a la espera de nuevas órdenes. Es opcional. 


TRON 

Visualiza en pantalla los números de línea por los que pasa el programa 
durante su ejecución, facilitando asi el descubrimiento y la corrección 
de errores. 


Puede introducirse como instrucción directa antes de la ejecución del 
programa. 


40) TROFF 
Anula la función de TRON. 


FOR <variable> = <valor inicial> TO <valor final> STEP <incre- 
mento> 


Se utiliza conjuntamente con la sentencia NEXT para establecer una 
sección de programa que se repita un número dado de veces, (Bucle 
FOR NEXT). 


e <variable>: Debe ser numérica. Inicialmente tendrá asignado el 
<valor inicial>, incrementándose, según el valor espe- 
cificado en <incremento> hasta alcanzar el <valor fi- 
nal>. 


e <valor inicial>: Valor inicial que tendrá la <variable>. Puede ser un 
número ó una expresión matemática en la que apa- 
rezcan valores numéricos y/o variables relaciona- 
dos por operadores. 


e <valor final>: Valor final que tomara la <variable>. 


e <incrementos>: Define el valor del paso o salto que, sucesivamente, 
incrementará o decrementará el valor de la <varia- 
ble> según sea positivo o negativo. 

Si no se especifica, el incremento será 1. (STEP1). 


NEXT <variable. 

Es la última instrucción de un búcle FOR NEXT. 

e<variable> Nombre de variable que identifica el bucle FOR NEXT. 
Debe corresponder con la variable especificada en FOR. 


NEXT, puede adoptar 3 formas distintas: 


NEXT : cierra el último bucle en caso de que hubiese 
varios. 

NEXTA : cierra el bucle identificado con la variable A. 

NEXTA,B : cierra primero el bucle identificador con la 
variable A y luego el identificado con la 
variable B. 


1. Imprime el cuadrado de los 100 primeros números: 
10 FORI=1TO 100 


20 PRINTI12 
30 NEXT | 


"7 OA 


HA A A A 
2. Imprime todos los números pares de O a 100 en modo decreciente. 


10 FORI= 100 TO 2 STEP-2 
20 PRINTI 
30 NEXT | 


O 


3. Lee una lista de 10 números con READ/DATA y los imprime 
en pantalla. 


10 FORX =1TO10 

20 READA (X) 

30 PRINT A (X) 

40 NEXTX 

60 DATA 100, 45, 320, 65, 43, 22, 4,8, 9, 2. 


Dentro de un mismo programa pueden utilizarse bucles FOR/NEXT 
anidados, ejecutándose unos dentro de otros. (no pueden entrela- 


zarse). 
Bucles anidados correctos Bucles anidados incorrectos 
10 FORA = 1702 10 FORA = 1702 
20 FORB =1TO5 20 FOR B = TOS 
[so PRINTA,B 30 PRINT A.B 
40 NEXT B 40NEXTA 
50 NEXTA S0NEXTB 
60 END 60 END 


GOTO <num. linea> 
Salto incondicional al número de línea especificado. 


*e<núm. linea>: número de línea en el que continuara la ejecución del 
programa. 


42 ) Es caso de especificar un número de línea que no existe en el programa 
se imprimirá el siguiente mensaje de error: “Undefined line number”. 


10 GOTO 40 

20 END 

40 PRINT “VENGO DE LA LINEA 10” 
50 GOTO 20 


IF <1* expresión> THEN <2* expresión> ELSE <3* expresión> 


IF es un «si» condicional. Es decir, si la <1* expresión> se cumple, 
entonces (THEN) ejecuta la <2* expresión>, que puede ser un número 
de línea, con lo cual pasará el control del programa a dicho número de 
línea, o bien una instrucción concreta. 

Si la <1* expresión> no se cumple, pasará a ejecutar la <3* expresión>, 
que igualmente puede ser un número de línea o una instrucción con- 
creta, 


10 IF A = B THEN 80 ELSE 140 
Si A es igual a B, entonces (THEN) ve a la línea 80. 
De lo contrario (ELSE). ve a la 140. 


10 IFA = BTHEN PRINT“A=B" “ELSE PRINT” “A<>B" 
Si A es igual a B, entonces (THEN) imprime “A = B”. 


De lo contrario (ELSE), imprime “A<>B". 


Si no se utiliza ELSE y la <1* expresión> no se cumple, continuará la 
ejecución en la siguiente línea del programa. 


101FA = BTHENPRINT"A =B"” 
20 PRINT“A<>B"” 


Si Aesigual a Bimprimira “A = B”. 
De lo contrario, imprimira “A<>B”. 


IF <1* expresión> GOTO <núm. linea> ELSE <2* expresión> 


Es similar a IF THEN ELSE con la diferencia que GOTO irá siempre 
acompañado de un número de línea. 
(Ver IF THEN ELSE) 


TOIFA=20 GOTO 60 ELSE C=0 ñ 


GOSUB <num. linea> 
Desvía la ejecución del programa hacia una subrutina. 


e <núm. linea>: linea de inicio de la subrutina. 


Una subrutina, es un pequeño programa que realiza una función con- 
creta. Si durante un programa se necesita realizar una determinada 
función varias veces, en lugar de escribir las líneas de programa que 
realizan dicha función tantas veces como se precise ejecutarla, se 
escribe una sola vez convirtiéndola en una subrutina. 


A lo largo del programa, el ordenador se dirigirá a dicha subrutina 
tantas veces como se le indique retornando a la ejecución normal del 
programa principal una vez haya realizado la subrutina en cuestión. 


RETURN 

Retorno, desde una subrutina, al programa principal. Es la última ins- 
trucción de una subrutina, continuando la ejecución del programa en la 
instrucción siguiente a la que fue llamada mediante GOSUB. 


10 PRINT "EJEMPLO SUBRUTINA” 
20 GOSUB 500 
30 PRINT “VUELVO DE LA SUBRUTINA” 


35 END 
500 PRINT “ESTOY EN LA SUBRUTINA " 
510 RETURN 


ON <expresión> GOTO <lista n* linea> 


Salta a un número de linea del programa, determinado por el valor de 
<expresión> 


e<expresión>: variable ó expresión de cuyo valor depende el número 
de línea donde se efectuara el GOTO. 


e<lista n* línea>: número de líneas correspondientes a los saltos que 
efectuará GOTO, según el valor de <expresión>. Por 


ejemplo, si el valor de <expresión> es 3, se hará un 
GOTO con el 3” número de la lista. 

Los números de linea deberán estar separados por 
coma, 


ON A GOTO 70, 100, 190, 600. 
e SiA = 0, salta ala instrucción siguiente a ON..GOTO 
e SIA = 1, salta a la línea 70. 


eSiA = 2, salta a la línea 100. 
e SIA = 3, salta a la linea 190 
eSiA = 4, salta a la línea 600 
e Si A> =5, salta a la siguiente instrucción a ON GOTO. 


ON <expresión> GOSUB <lista n* linea> 


Es similar a ON GOTO, con la diferencia de que los saltos se 
efectuaran a las subrutinas, cuyas lineas de inicio son las indicadas 
en <lista n* línea>. 


ON A*5 GOSUB 100, 300 a 
e Si A*5 = 0, Salta ala instrucción siguiente a ON..GOSUB. 


e SiA*5 = 1, Salta a la subrutina que empieza en la línea 100. 
e SiA*5 = 2, Salta a la subrutina que empieza en la línea 300. 
e SiA*5 = 3, Salta a la instrucción siguiente a ON..GOSUB. 


EST OOO ANNO 


3. DEFINICION E INICIALIZACION 


e CLEAR 
e DIM 
e ERASE 
e DEFINT 
e DEFSNG 
e DEFDBL 
e DEFSTR 
Ñ e DEFUSR 
= e USR 

e KEY 

e TIME 


CLEAR 


Asigna a todas las variables numéricas el valor cero y borra todos los 
datos acumulados en las variables alfanuméricas. 


Usado como comando, seguido de un número, además de realizar las 
funciones descritas, en el párrafo anterior, reserva el número especifi- 
cado en BYTES para las cadenas relativas a las variables alfanuméricas. 


CLEAR : Asigna a todas las variables el valor cero. 
CLEAR 500  :Asigna a todas las variables el valor cero, y 
reserva 500 Bytes para las cadenas 


relativas a las variables alfanuméricas. 


A 


NOTA: Inicialmente, el ordenador reserva un espacio de 200 Bytes para 
cadenas alfanuméricas, pudiendo ser ampliado mediante CLEAR si 
las necesidades del programa lo requieren. 


DIM variable, <(dimensión)> 


Dimensiona una variable subindicada (numérica o alfanumérica), de- 
terminando el número máximo de elementos que podrá contener. 


e <variable>: variable a dimensionar. 
e <dimensión>: dimensión de la variable 
(ver apartado 1.5.2. variables subindicadas) 


Las variables subindicadas podrán tener uno o más subindices y por 
consiguiente, capaces de albergar simultáneamente varios valores. 


DIMA (10) 

DIMA (2,5) 

DIM A (2,3,2) 
DIM A (2,2,3,4,...) 


ERASE -<lista de variables> 

Borra las:variables dimensionadas especificadas en <lista de varia- 
bles>, con el fin de poder dimensionarlas de nuevo sin que se produzca 
el error: Redimensioned Array". 


e<lista de variables>: variables dimensionadas a borrar. 


10 DIMA (15) 
20 FOR | =0TO 15 
30A (1) =1+1 


40 NEXT 1 
50 ERASE A 
60 DIM A (20) 


Sin la instrucción de la línea 50, ERASE A, no podemos dimensionar de 
nuevo la variable A en la línea 60, pues se producirá el error. "Redimen- 


sioned Array”, ya que una misma variable no puede dimensionarse dos 
veces. 


DEFINT <lista de variable> 

Define las variables especificadas como enteras. (sin parte decimal) 

e <lista de variables>: variables que van a ser definidas como enteras. 
Deben ir separadas por una coma. 


10 DEFINTA, B, X 
204 =7.18:B = 16.8: X = 1,6 


30 PRINTA; B; X 
(RUN) 
7 16 1 


DEFSNG <lista de variables> 
Define las variables especificadas, en simple precisión. (Se repre- 
sentaran 6 dígitos como máximo). 


e <lista de variables>: variables que van a ser definidas en simple 
precisión. Deben ir separadas por una coma. 


10 DEFSNG A,B,X 
20 A= 128345.6342 
30 B = 3256.83716 


40 X= 12.684372 
50 PRINT A;B;X 
(RUN) 
128345 3256.83  12.6843 


DEFDBL <lista de variables> 
Define las variables especificadas, en doble precisión. (Se representa- 
ran 14 digitos como máximo). 


e<lista de variables>: variables que van a ser definidas en doble preci- 
sión. Deben ir separadas por coma. 


10DEFDBL A,B 

20A = 30/4.3:B = 45/87 

308 = PRINT A;¡B 

(RUN) 

6.9767441860465  0.51724137931034 


DEFSTR <lista de variables> 
Define las variables especificadas como alfanuméricas. 


e <lista de variables>: variables que van a ser definidas como 
alfanuméricas. Deben ir separadas por coma. 


10 DEFSTRA,B 
20A = "BASIC" 
30B = "MSX" 
40PRINTA+"  "+B 
(RUN) 
BASIC MSX 


NOTA: En todos los comandos de declaración de caracteres (DEFINT, 
DEFSNG, DEFDBL, DEFSTR), puede especificarse también un rango de 
variables a declarar. Por ejemplo, DEFINT A-D, define las variables 
A,B.C.D. de tipo entero. 


DEFFN <nombre><(lista de parametros)> = <definición de la 
funcián> 


Permite definir una función por el usuario. 


*<nombre>: Puede ser el nombre de cualquier variable. Este <nom- 
bre>, precedido de FN, será el nombre de la función. 


e< (lista de parámetros>: Estará compuesta por todas las variables que 
existan en la <definición de la función> y serán sustituidas al llamar a 
dicha función. Las variables deben estar separadas por coma. 


e<definición de la función>: Expresión matemática que realiza las 
operaciones de la función definida, estando limitada a una línea (255 
caracteres). 

Las variables utilizadas en esta expresión, únicamente sirven para defi- 
nir la función, no influyendo las variables del programa que tengan el 
mismo nombre. Si en posteriores llamadas a esta función, se omite el 
valor de una variable será tomado su último valor. 

La llamada a la función se realizará utilizando la siguiente estructura: 
FN <nombre> <(valores de las variables)>, 


Si se realiza la llamada de una función antes de que esta haya sido 
definida, se producirá el error: «Undefined user function». 
DEFFN no puede utilizarse como instrucción directa. 


DEFUSR <número> = <dirección> 
Define la dirección de inicio de una subrutina en lenguaje máquina. 


e <número>: número de la subrutina USR. Debe ser un entero entre 0 
y 9. Si se omite, se asignará por defecto el valor 0, 
(DEFUSA 0) 

e <dirección>: Dirección de inicio de la subrutina USR especificada. 


USR <número> <(x)> 


Ofrece el resultado obtenido al ejecutar una rutina en lenguaje máquina 
que empieza en la dirección definida por DEFUSA. 


* <número>: Identifica la subrutina con un número determinado que 
debe ser un entero entre 0 y 9. Si se omite, se asignará 
por defecto el valor 0. (USRO). 


e <(x)>: Parámetro que será utilizado por la subrutina en lenguaje 
ensamblador. 


KEY <número>, <"expresión"> 
Define las teclas de función F1 a F10 


e<número>: número de la tecla de función a definir. Debe ser un 
entero entre 1 y 10. 


e<«expresión»>: sentencia, comando, función, operación, etc., que 
se va a definir. 
Puede tener como máximo 15 caracteres, 


Para utilizar el contenido de las teclas programadas, 
ejecute KEY LIST (ver KEY LIST para más detalles). 


TIME 

Temporizador interno del sistema. Al inicializar el sistema se pone a 
cero y va incrementándose en 1 cada vez que VDP genera interrupción 
(60 veces por segundo). Dividiendo el valor de TIME por 60 obtendre- 
mos un contador de segundos. 


TIME es una variable especial del sistema. Automáticamente toma el 
valor O y va incrementándolo, aunque también podemos asignarle un 
valor inicial por programa. (TIME = <valor>) 


4. COMANDOS Y FUNCIONES DE I/O 


e READ 

e DATA 

e RESTORE 

e INPUT 

e LINE INPUT 
e LET 

eMID$( )=YS 
e PRINT 

e PRINT USING 
e LPRINT 

e LPRINT USING 
eLPOS 

e SWAP 

e INKEYS 

e INPUTS 

e FRE 

e POKE 

e PEEK 

e VPOKE 

e VPEEK 

e INP 

eO0UT 

e WAIT 

e STICK 

e STRIG 


READ <lista de variables> 
Lée los datos correspondientes a una sentencia DATA, asignándolos a 
las variables especificadas en <lista de variables>. 


<lista de variables>: Pueden ser numéricas o alfanuméricas y la única 
condición que deben cumplir es que estén sepa- 
radas por coma. 


READ se utiliza conjuntamente con DATA. Cuando el Ordenador en- 
cuentra una sentencia READ, buscará el DATA correspondiente en 
cualquier lugar del programa. 


Cuando el ordenador llega a la línea 10, realizará una operación de 
lectura en el DATA de la línea 500, asignando a la variable A$ el valor 
PEDRO y a B el valor 23. 


DATA <lista de datos> 
Constituye un archivo de datos dentro del programa, que en cualquier 
momento pueden ser leidos por READ. 


<lista de datos>: Pueden ser números, caracteres ó ambas cosas y 
deben estar separados por coma. Estos valores se- 
rán asignados sucesivamente a las variables de 
READ. 


El número de datos contenido en <lista de datos> nunca puede ser 
menor que el número de variables contenida en <lista de variables> 
de la sentencia READ. De otra forma, se originaria el error “Outof 
Data”. 
. 

Si dentro de <lista de datos> queremos introducir un dato que con- 
tenga signos especiales como coma (,) dos puntos (:)... etc., éstos 
deberán ir entre comillas. Las comillas no pueden utilizarse como dato 
dentro de DATA. 


10 REM$ EJEMPLO READ/DATAS 
20FOR|=1T02 
BO READ AS, BS, C$ 


50 NEXT! 
60 DATA HIT, BIT, 55, SONY 
70 DATA BASIC, MSX 


En la primera operación de lectura (| = 1), los valores asignados a A$, 
B$ y C$ son respectivamente: HIT, BIT, 55. 


En la segunda lectura (1 = 2), los valores asignados serán: SONY, BA- 
SIC, MSX. 


RESTORE <núm. línea> 
Indica el número de línea donde se encuentra el DATA que contiene los 
datos a leer por READ, 


Si no se indica <núm. línea>, se reestablecerá el orden de lectura, 
colocando el puntero en el primer dato de la primera línea DATA del 
programa. 


10 READ AS, B 


50 RESTORE 
60 READ A$,B 


100 DATA PEDRO, 23 


Sin la instrucción RESTORE de la línea 50, se produciría el error “OUT 
OF DATA”, ya que el READ de la línea 60, intentaría leer los datos 
posteriores a PEDRO, 23 que no existen. De esta forma, restablecemos 
el orden de lectura, colocando el puntero en el primer dato (PEDRO), 
por lo que las instrucciones de las líneas 10 y 60, leerán los mismos 
datos. 


10 READAS,B 


50 RESTORE 520 
60 READC,D,E,F 


500 DATA PEDRO, 23 
510 DATA 100, 200 

520 DATA 400, 350, 600 
530 DATA 800, 900 


La línea 10, lee los datos PEDRO, 23. 

La línea 50, hace que el próximo READ se efectúe a partir de la linea 520, 
originándose los siguientes valores: C=400, D= 350, E= 600, 
F = 800. 


Sin la instrucción de la línea 50 (RESTORE 520), los valores se habrían 
asignado de la forma: 
C = 100, D = 200, E = 400, F = 350. 


INPUT <lista de variables> 
Asigna un valor, introducido desde el teclado, a una variable. 


e <lista de variables> Variables (numéricas o alfanuméricas) a las que 
serán asignados los valores introducidos desde 
el teclado. 


Si durante la ejecución del programa éste se encuentra con el comando 
INPUT, la ejecución se detendrá, apareciendo en pantalla un interro- 
gante (?), y permanecerá a la espera hasta que introduzcamos un dato 
desde el teclado, que será asignado a la variable asociada al comando 
INPUT. 


INPUTA 
INPUTAS 


El comando INPUT nos permitirá, si así lo deseamos, incluir un men- 
saje, que deberá ser escrito entre comillas, y que en el momento de 
ser ejecutado se imprimirá en la pantalla. 


20 INPUT “ESCRIBE UN NUMER 
30 PRINT "EL CUADRADO DE”; X; “ES”; X"X 


Al ejecutar el programa anterior, el ordenador nos pedirá el valor de X: 


ESCRIBE UN NUMERO: ? 


Una vez introducido, se lo asignará a la variable X y continuará con la 
ejecución del programa imprimiendo el cuadrado del valor introducido. 


Con un solo comando INPUT, pueden asignarse varios valores a distin- 
tas variables, siempre que estén separadas por coma: INPUT A,B,C. 
Así mismo, al introducir los datos desde el teclado, deberemos separar- 
los por coma. 


10 INPUT "INTRODUZCA LA FECHA"; D,M,A 
(RUN) 
231,12, 84 


Si en un comando INPUT, que tiene asociada una variable numérica, 
introducimos un valor alfanumérico, se imprimirá el mensaje de error: 
«Redo from start», permaneciendo de nuevo a la espera del dato. 
(Recuerde que después de teclear el valor de entrada debe pulsar la 
tecla RETURN). 


T1OINPUT “AyB";A,B a 
20 PRINTA*"B 

(RUN) 

AyB? 10, PE 

REDO FROM START 
AyB? 10,20 

200 

oK 


10 INPUT “SU NOMBRE"; NOS 
20 PRINT “HOLA,”; NOS 


10 INPUT “NOMBRE Y EDAD: "N$,E 
20 PRINT, NS; “TIENE”; E; “AÑOS ” 


LINE INPUT <variable> 

Asigna una cadena de caracteres, introducidos desde el teclado, a una 
variable alfanumérica. El número máximo de caracteres de la cadena es 
254, 


e<variable>: variable alfanumérica a la que se asignará la cadena de 
caracteres introducida desde el teclado. 


LINE INPUT es similar a INPUT, teniendo en cuenta las siguientes 
diferencias: 


e No imprime el interrogante. 
e Sólo puede utilizarse con variables alfanuméricas 
e Sólo puede utilizarse con una variable. 


asignados a la variable AS. 


LET <variable> = <expresión> 
Asigna un valor a una variable. 


e <variables>: variable a la que se asignará el valor <expresión>. 
Puede ser numérica o alfanumérica. 


e <expresión>: valor que se asignará a la variable especificada. 


LET es opcional, ya que directamente, puede asignarse una expresión a 
una variable mediante el signo «igual» (=), sin utilizar dicho comando, 


Así, las siguientes instrucciones realizan la misma función: 


TOLETA = 100 
10A= 100 


MID$ <(X5,N, M)> = Y$ 
Extrae M caracteres de la variable X$, a partir de la posición. N, sustitu- 
yéndolos por M caracteres de la variable Y$. 


Si se omite M, se colocarán todos los caracteres de Y$. 
Y$ no debe ser mayor que X$. 


10 A$ = “ORDENADOR” 
20B$= “SONY” 
30 MIDS (AS, 3,3) = B$ 


40 PRINTAS 
(RUN) 
ORSONADOR 


PRINT <expresión> 
Imprime en pantalla la <expresión> 


e <expresión>: Puede ser de varios tipos: 


1. Valores numéricos: 
PRINT 50 


2. Variables numéricas cuyos valores han sido asignados previamente: 
10A=3 
20 PRINTA 
Imprime en pantalla: 3 


3. Variables de cadena cuyos valores han sido asignados previamente: 
10A$= "MSX" 
20 PRINT AS 
Imprime en pantalla: MSX 


4. Expresiones que contienen operaciones aritméticas o lógicas: 
10A=10 
20 PRINT 3"2+A 
Imprime en pantalla: 26 (resultado de 3"2+10) 


y A M>> 


5. Cadenas encerradas entre comillas: 
10 PRINT “BASIC MSX" 
Imprime en pantalla: BASIC MSX 


Las expresiones separadas por coma se imprimirán en dos campos 


distintos: 


10A=5:B=10 
20 PRINTA,B 


(RUN) 
5 10 


Las expresiones separadas por punto y coma (;) se imprimirán a conti- 
nuación de la anterior, teniendo en cuenta que las expresiones numéri- 
cas estarán separadas por dos espacios. 


Si al final de la última expresión de un comando PRINT hay un punto y 
coma, la próxima sentencia PRINT se imprimirá a continuación de ésta. 


Si se utiliza PRINT sin ninguna expresión, se imprimirá una línea en 
blanco. 


El símbolo de interrogación (?) puede utilizarse en lugar de la palabra 
PRINT: 


PRINT 10 
210 


Ambas expresiones realizan la misma función. (imprimen en pantalla: 
10). 


PRINT USING <Formato>; <expresión> 

* Imprime en pantalla la <expresión> utilizando el <formato> especi- 

ficado. 

e <Formato>: caracteres que definen el formato de impresión. 

e <expresión>: — variables o expresiones que van a ser impresas con 
el formato especializado, Deberán estar separadas 
por coma. 


Cuando se usa PRINT USING para imprimir variables alfanuméricas, 
pueden utilizarse los siguientes caracteres, para su formateado: 


1. “1” indica que sólo se imprimirá el primer carácter de la variable 
alfanumérica. 


h K—_——— = 


2. "+": el signo de adición indica que el signo del número a escribir se 
colocará delante o detrás del mismo. 


PRINT USING "+ 4. 2"; 1.26, -1.25 
+1.25 -1.25, 
Ok 
PRINT USING “4 4 4.4% 4 +"; 1.25,-1.25 
(RUN) 
1.25 + 1.25- 


3. "—": el signo de sustracción al final del formato, implica la coloca- 
ción de dicho signo al final de los números negativos. 


PRINT USING “4 4. 2 —”; 1.25, -1.25 
Ok 
1.25 1.25- 


po 


4. ** *”: un doble asterisco al principio del formato indica que apare- 
cerá el asterisco en los lugares en que sobre espacio, previos al 
dígito. También indica dos o más lugares para dígitos. 


PRINT USING “** % 2. ':1.25, -1.25 
2125. 1.25 
Ok 


_ 


5. "££” aparecerá el símbolo de la libra inmediatamente a la izquierda 
del número en cuestión. Los £ £ ofrecen dos posiciones más de 
digitos, una de las cuales es el signo dela libra. La forma exponencial 
no puede ser usada con£ £. 


PRINT USING "££ + + ”; 5680 
£ 5680 


ok 
62) 


A$ = "España" 

Ok 

PRINT USING *!”"; AS 
E 

Ok 


2. "Yn espacios 1”, indica que van a imprimirse 2+n caracteres de la 
variable alfanumérica. ; 


AS = “España” 
Ok 

PRINT USING “1 
ESPAÑ 

Ok 


3. “8” Indica que serán impresos todos los caracteres de la variable. 


A$ = “España” 

Ok 

PRINT USING “Me gusta mucho 4”; AS 
Me gusta mucho España 

Ok 


Cuando se usa PRINT USING para imprimir datos numéricos, pueden 
utilizarse los siguientes caracteres para su formateado: 


1. “4 " se usa para representar cada posición de dígito. Si el número a 
ser impreso tiene menos digitos que posiciones especificadas, el 
número será precedido por tantos espacios en blanco como x* so- 
brantes. 


PRINT USING "4 4  % %. 2% 2"; 10.983, 8.6, 764,3 
(RUN) 


10.98 8.60 764.30 


6. "**£”: combina los efectos de los dos simbolos anteriores. Los 
espacios en blanco serán llenados con asteriscos y el signo de la 
libra aparece antes del número. Los * *£ ofrecen tres posiciones 


más de digitos, uno de los cuales es £.. 


PRINT USING ** * £x 7% 22"; 12.35 
* £12.35 
Ok 


final de la secuencia, se imprimirá al final del número. 


PRINT USING “+ + +, +”; 1234.5 
1,234.50 
Ok 


PRINT USING “% -% 7% %,"; 1234.5 
1234.50, 
Ok 


3 : una coma situada a la izquierda del punto decimal en la secuen- 
cia implica que una vez ejecutada la sentencia, aparecerá una coma 
situada tres dígitos a la izquierda del decimal. Una coma situada al 


0 


****"*: convierten el número dado en exponencial. 


PRINT USING "ye 4.2 4 ****"; 234,56 
235 E+02 


Ok 

PRINT USING “4.34 4 32 
1.23E+01- 

Ok 

PRINT USING "++.  “"*”"; 12.34, -12.34 
+1.23E+-01 - 1.23E+01 

Ok 


-12,347 


9. "%': si el número a imprimir tiene más dígitos que los previstos en la 
instrucción, se imprimirá el símbolo % junto al número. Lo mismo 


sucede si la operación de redondeo causa que el número contenga 
más digitos de los previstos. 


PRINT USING "4 4. 4"; 123,45 
% 123.45 
Ok 


PRINT USING ".* "998 
% 100 
OK 


Si el número de dígitos excede de 24. aparece el mensaje de error 
«lllegal function call». 


LPRINT 


Imprime en impresora. Sigue las mismas normas que PRINT. (ver 
PRINT para más detalles). 


LPRINT USING 
Imprime en impresora con un formato específico. Sigue las mismas 
normas que PRINT USING. (ver PRINT USING para más detalles). 


LPOS 
Realiza la función de POS referida a la impresora (Ver comando POS 
para más detalles). 


SWAP <X>, <Y> 

Intercambia los valores de las variables especificadas. Ambas variables 
deben ser del mismo tipo (enteras, simple precisión...) de lo contrario 
se producirá el error: "Type mismatch.” 


e <X>: variable que tomará el valor de la variable <Y>, 


e <Y>: variable que tomará el valor de la variable <X>, 


10A=5:B=10 
20 PRINT "A =";A, 


30 SWAP A,B 


40PRINT"A =";A,“B 
(RUN) 


A=5 B=510 
A=10 B=5 


INKEY $ 


Devuelve una cadena de un sólo carácter definido por la pulsación de 
Una determinada tecla. Si no se pulsa ninguna tecla durante el periodo 
de observación, devuelve una cadena nula. 


Debido a la corta duración de los ciclos de observación, INKEY $ se 
sitúa dentro de alguna clase de bucle para que sea observado continua- 
mente. 2 


10A$ = INKEYS 
20IFAS=" “GOTO 10 


INPUTS (o) 


Detiene el programa hasta que se hayan introducido x caracteres. Los 
caracteres introducidos no serán visualizados en pantalla. Pulsando 
CTRL-C ó CTRL-STOP se anulará INPUTS (X). 


E 10 X$ = INPUTS (25) 


FRE <(expresión)> 


Determina el número de BYTES libres en memoria RAM. 


e<(expresión)>: Puede ser cualquier carácter alfanumérico, no influ- 
yendo en el resultado. Si el carácter va entre comillas, 
nos indicará el número de BYTES reservados para las 
cadenas relativas a variables alfanuméricas. (Ver 
CLEAR para más detalles). 


PRINT FRE (X) 


PRINTFRE (“2”) 


POKE <dirección>, <dato> 
Escribe un dato en la posición de memoria especificada. 


e <dirección>: Dirección de memoria donde se escribirá el dato. Debe 
estar comprendida entre -32768 y 65535. 
Si el valor es negativo, la dirección real será 65.536 
menos el valor especificado. (-1, será calculado como 
65.536-1 = 65.535.) 
(ver Mapa de memoria) 


* <dato>: Dato (BYTE) que va a ser escrito en la dirección de memoria 
especificada. Debe ser un número entre 0 y 255. 


POKE 63.522, 65 


PEEK <(dirección)> 
Es la función complementaria de POKE. Lée el dato (número entero 
entre 0 y 255) almacenado en la dirección de memoria especificada. 


e<(dirección)>: Dirección de memoria donde se encuentra el dato que 
deseamos leer. 


Para visualizar el dato leído, utilizaremos PRINT. 


l PRINT PEEK (63.522) ] 


VPOKE <dirección>, <dato> 
Almacena un dato en la dirección especificada de la V RAM. (memoria 
de pantalla). 


e<dirección>: Debe ser un número entero entre O y 16.383. (ver Mapa 
de memoria). 


e<dato>: Dato (BYTE) que va a ser almacenado en la dirección de 
memoria especificada, Debe ser un entero entre 0 y 255. 


VPOKE 14500, 65 


VPEEK <(dirección)> 
Es la función complementaria de VPOKE. Lée el dato (número entero 


entre O y 255) almacenado en la dirección especificada de la VRAM 
(memoria de pantalla). 


e<dirección>: Debe ser un número entero entre 0 y 16.383. 


INP <port> 
Lée el BYTE almacenado en el port especificado. 


'*e<port>: número del port donde va a efectuarse la lectura, Debe ser 
un entero entre 0 y 255. 


INP es la función complementaria de OUT 


OUT <port>, <valor> 
Escribe un BYTE en el port de salida especificado. 


e<port>: número del port donde va a efectuarse la operación de 
escritura. Debe ser un entero entre 0 y 255. 
e<valor>: Dato (BYTE) que va a ser transmitido. Debe ser un entero 
entre 0 y 255. 


WAIT <port>, Y,Z 
Efectúa una pausa hasta que el dato del port de entrada cambie a un 
valor determinado. 


*e<port>: número del port de entrada utilizado. 


La secuencia de operaciones que implica la ejecución de esta instruc- 
ción, son las siguientes: 


1. Lée el dato en <port> 
2. Opera en forma OR exclusiva (EX-OR) el dato leido con el valor Z. 


"5. ER 


3. Efectúa el producto lógico AND entre el resultado de la operación 
EX-OR y el valor Y. 
Si el resultado es O, realiza de nuevo todo el proceso. En caso 
contrario prosigue la ejecución del programa a partir de la instruc- 
ción que sigue a WAIT. 


STICK <(N)> 


Determina el movimiento realizado por el Joystick, dando un valor 
numérico según la siguiente codificación: 


Movimiento STICK (N) 


e Centro 
Ascendente 
e Diagonal derecha ascendente 
e Derecha 
e Diagonal derecha descendente 
e Descendente! 
e Diagonal izquierda descendente 
e Izquierda 
e Diagonal izquierda ascendente 


OLUDUALNO 


*e<(N)>: indica el Joystick utilizado. 
N =0: teclado 
Joystick 1 


[10 Joystick 2 dl 


Conecte el Joystick 1 y mueva la palanca para visualizar los distintos 
valores tomados según el movimiento realizado: 


10 LOCATE 5,3 
20 PRINT STICK (1) 


30 GOTO 10 


STRIG <(N)> 


Tomael valor -1 al pulsar el botón de disparo del Joystick. Si no se pulsa, 
toma el valor 0. 


*<(N)>: Indica el Joystick utilizado: 

N = 0: teclado (botón de disparo = barra espaciadora) 
N = 1: Joystick 1 

N = 2: Joystick 2 


. INTERRUPCIONES 


e ON KEY GOSUB 

e KEY (N) ON/OFF/STOP 

e ON STRIG GOSUB 

e STRIG (N) ON/OFF/STOP 

e ON STRIG GOSUB 

e STOP ON/OFF/STOP 

e ON SPRITE GOSUB 

e SPRITE ON/OFF/STOP 

e ONINTERVAL =< >GOSUB 
e INTERVAL ON/OFF/STOP 


ON KEY GOSUB <n? de linea> 

Interrumpe el programa principal al pulsar una determinada tecla de 
función (F1-F10), pasando a realizar la subrutina de interrupción indi- 
cada en <n? de línea>. 


e<n? de línea>: números de líneas iniciales de las subrutinas. 


ON KEY GOSUB 100, 200, 350, 760,... 


100 es la línea de inicio de la subrutina de interrupción correspon- 
diente a la tecla de función F1. (KEY (1)). 


200 es la línea de inicio de la subrutina de interrupción correspon- 
diente a la tecla de función F2, (KEY (2)). 


Al producirse una interrupción, se ejecutará automáticamente un KEY 
(n) STOP. (ver comando KEY ON/OFF/STOP). 


Si dentro de la subrutina de interrupción no se ha especificado KEY- 
(n)OFF, después de ser ejecutado el RETURN, (retorno de la subrutina 
al programa principal) se ejecutará también un KEY(n)ON, quedando de 
nuevo habilitada la interrupción para esta tecla. 


Si se produce una interrupción de error (debida a un comando ON 
ERROR), se inhibirán automáticamente todas las interrupciones. (in- 
cluidas ERROR, STRIG, STOP, SPRITE, INTERVAL, KEY). 

KEY ON/OFF/STOP 


Se utilizan para habilitar/inhibir interrupciones con las teclas de fun- 
ción Fn. (KEY(n)). 


e KEY(n)ON: Permite interrupción con la tecla de función Fn. (KEY(n). 


10 KEY (1) ON 

20 ON KEY GOSUB 200 4 
30 REM PROGRAMA PRINCIPAL 

40 FOR X= 1 TO 100 

50 PRINT X 

60 NEXT X 

70 CLS 

80 GOTO 30 

200 REM SUBRUTINA DE INTERRUPCION 
210 CLS. 

230 PRINT “HAS PULSADO F1” 

230 FOR I=1 TO 100 


240 LOCATE 0,10: PRINT 1 
250 NEXT | 


260 CLS 
270 RETURN 


En la línea 10, indicamos al ordenador que «permitimos» interrumpir el 
programa pulsado F1. 


En la linea 20, le indicamos que si durante el transcurso del programa 
principal se pulsa la tecla F1, pase a ejecutar la subrutina que empieza 
en la línea 200. 


El programa principal (10-80) se ejecutará con toda normalidad hasta 
que pulsemos F1, momento en que se detendrá, pasando a ejecutar la 
subrutina de interrupción correspondiente. Una vez finalizada la ejecu- 
ción de esta subrutina el programa seguirá su curso a partir del punto 
donde fué interrumpido, pudiendo ser interrumpido de nuevo del 
mismo modo anterior. 


KEY(n)OFF: Inhibe la interrupción de la tecla de función Fn. (KEY(n)). 
Si en el ejemplo anterior sustituimos la línea 10 por: 10 
KEY (1) OFF, aunque pulsemos F1, no se interrumpirá el 
programa siguiendo éste su curso normal. 


KEY(n)STOP: Si previamente a KEY(n)STOP se habilitó la interrupción 
mediante KEY(n)ON, al pulsar latecla Fn no se producirá 
interrupción, pero memorizará que se pulsó dicha tecla y 
pasará a ejecutar la subrutina correspondiente después 
de encontrar la autorización de interrupción KEY(n)ON. 


10 KEY(1)ON 
4 20 PRINT “BASIC MSX" 
30 KEY(1) STOP 
40 ON KEY GOSUB 500 


100 PRINT “FIN = F1” 


110KEY(1)ON 


500 PRINT “FIN” 
510 RETURN 


Aunque pulsemos F1, el programa no será interrumpido hasta que 
aparezca el mensaje que imprime la linea 100: «FIN = F1», ya que es en 
la línea 110 donde se habilitó de nuevo la interrupción para F1. 


ON STRIG GOSUB <n' de líneas> 

interrumpe el programa principal cuando se pulsa el botón de disparo 
de los Joysticks o la barra espaciadora del teclado. 

Su funcionamiento es similar a ON KEY GOSUB. (Ver ON KEY GOSUB 
para más detalles). 


STRIG(n) ON/OFF/STOP 
Se utilizan para habilitar/anular interrupciones con el botón de disparo 
de los Joysticks o con la barra espaciadora del teclado. 


(n) debe ser un número entero entre O y 4. 
. 


en 
en 


=0  : labarra espaciadora es utilizada como botón de disparo. 
163: seutiliza el botón de disparo de Joystick 1. 
264: seutiliza el botón de disparo del Joystick 2. 


Su funcionamiento es similar a KEY ON/OFF/STOP (Ver KEY ON/OFF/ 
STOP para más detalles). 


ON STOP GOSUB <n'. de línea> 


interrumpe el programa principal al pulsar CTRL-STOP, pasando a 
realizar la subrutina de interrupción cuya linea de inicio es la indicada 
en <n”. de linea>. 


Utilize con precaución este comando. Por ejemplo, el siguiente pro- 
grama no podrá detenerse. La única solución es hacer un RESET ó. 
desconectar el aparato: 


10 ON STOP GOSUB 40 
20 STOP ON 
30 GOTO 30 
40 RETURN 


STOP ON/OFF/STOP 

Se utilizan para habilitar/anular interrupciones mediante CTRL-STOP. 
Su funcionamiento es similar a KEY ON/OFF/STOP. (ver 
KEY/ON/OFF/STOP). 

ON SPRITE GOSUB <n' línea> 

Interrumpe el programa principal cuando se solapan dos SPRITES en la 
pantalla, 

Su funcionamiento es similar a ON KEY GOSUB (ver ON KEY GOSUB 
para más detalles). 

SPRITE ON/OFF/STOP 


Se utilizan para habilitar/anular interrupciones cuando coinciden dos 
SPRITES. 


Su funcionamiento es similar a KEY ON/OFF/STOP. (ver KEY 
'ON/OFF/STOP para más detalles). 


ON INTERVAL =<tiempo> GOSUB <n? línea> 


interrumpe el programa principal cada periodo de tiempo especificado. 
en <tiempo>/60. 


10 ON INTERVAL = 60 GOSUB 500 


Al ejecutar esta línea, cada segundo (60/60) se interrumpirá el pro- 
grama principal para ejecutarla subrutina que comienza en la línea 500. 


Su funcionamiento es similar a ON KEY GOSUB, con la diferencia de 
que la interrupción se producirá automáticamente cada cierto tiempo, 
sin tener que pulsar ninguna tecla. 

INTERVAL ON/OFF/STOP 


Se utiliza para habilitar/anular interrupciones temporales con INTER- 
VAL. 


Su funcionamiento es similar a KEY ON/OFF/STOP. 


(Ver KEY ON/OFF/STOP para más detalles). 


6. FUNCIONES NUMERICAS 


e ABS 
e INT 

e FIX 
eSGN 
e CDBL 
e CSNG 
e CINT 
e EXP 
e LOG 
eSQR 
e SIN 
eCOos 
e TAN 
e ATN 
e RAND 


ABS (X) 
Da el valor absoluto de X. El resultado siempre será positivo. 


10 PRINT ABS (-5) 
(RUN) 
5 


INT (X) 


Calcula el mayor entero menor o igual a X. 


10 PRINT INT (2.56) 
(RUN) 
2 


10 PRINT INT (—2.56) 
(RUN) 
= 


FIX (X) 
Dala parte entera de X. FIX (X) es equivalente a SGN (X) *INT(ABS (X)). 


La mayor diferencia entre FIX e INT es que cuando trabajan con núme- 
ros negativos (X<O) FIX da la parte entera por exceso e INT por defecto. 


10 PRINT FIX (2.56) 
(RUN) 
— 


SGN (X) 
Determina el signo de X: 
SiX>0 : SGN (X) = 1 


Si X<0 : SGN (X 
SiX = 0: SGN (X) = 0 


CDBL (X) 


Representa el número X en doble precisión. 


10 A = 53.45567893141785 
20 PRINT CDBL (A) 
(RUN) 
53.455678931418 


CSNG (X) 
Representa el número X en simple precisión, 


10 A = 45.987666666634 
20 PRINT CSNG (A) 
(RUN) 
53.4457 


CINT (X) 

Representa el número X como entero, eliminando la parte decimal. X 
debe estar comprendido entre —32768 y 32767. En caso contrario se 
producirá error de Overflow (desbordamiento) 


10A = 45.98765 
20 PRINT CINT (A) 
(RUN) 
45 


EXP (0) 


Calcula la expresión e*. x debe ser menor o igual a 145.06286085862 
(e, es la base de los logaritmos naturales e = 2,7182818284588). 


10 PRINT EXP (2) 
(RUN) 


7.38905609893 


LOG (X) 
Calcula el logaritmo neperiano de X. (logaritmo en base e). 


Para obtener el logaritmo de X en otra base (base Y) deberá realizar la 
siguiente operación: 


LOG (X)/LOG (Y) = Logaritmo de X en base Y. 


1. logaritmo neperiano de 4: 
10 PRINT LOG (4) 

(RUN) 
1.3862943611199 


2. logaritmo de 1000 en base 10 


10 PRINT LOG (1000/LOG (10) 
(RUN) 
3 


SQR (X) 


Calcula la raíz cuadrada de X. X debe ser un número mayor o igual a 
cero. De lo contrario se producirá el error: *lllegal function call.” 


10 PRINT SOR (25) 
(RUN) 
5 


SIN (X) 
Da el valor de seno de X. (en radianes). 
El cálculo se efectúa en doble precisión. 


10 PRINT SIN (3.1416/2) 
(RUN) 
.99999999999324 


COS (X) 


Da el valor de coseno de X. (en radianes). 
El cálculo se efectúa en doble precisión. 


10 PRINT COS (0) 


(RUN) 
1 


TAN (X) 


Da el valor de tangente de X (en radianes). 
El cálculo se efectúa en doble precisión. 


10 PRINT TAN (0.1) 
(RUN) 


+,10033467208545 


ATN (X) 

Da el ángulo (en radianes), cuya tangente es X. El resultado estará 
comprendido entre —1/2 y +1/2. El cálculo se efectúa siempre en 
doble precisión, 


10 PRINT ATN (0.3) 
(RUN) 
.29145679447789 


AND (X) 
Genera un número aleatorio entre 0 y 1. 


El argumento de RND, X, se utiliza para controlar la generación del 
número aleatorio. Cada vez que se ejecute un programa que contenga 
RND, se generará la misma secuencia de números aleatorios. Durante 
la ejecución de un programa, si X<0 se generará la misma secuencia 
anterior. Si X = O repetirá el último número generado y si X>0, generará 
el próximo número aleatorio de la secuencia. 


10 PRINT AND (1)*100 
20 PRINT RND (—1)=100 
30 PRINT AND (0)*100 
40 PRINT AND (1)*100 
(RUN) 
59.521943994623 
4.384820420821 
4.384820420821 
9.62486816692 
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7. CONVERSION DE CODIGOS 


e ASC 
e CHR$ 
e BIN$ 
e OCT$ 
eo HEX$ 
e VAL 
e STR$ 


ASC <(X$)> 
Determina el código ASCII del carácter X$. 


CHAR $ () 
Realiza la función inversa de ASC. Determina el carácter que en código 
ASCII corresponde al número X. 


10 PRINT CHR $ (65) 
(RUN) 
A 


BINS (X) 
Convierte el número decimal X en un número binario. El valor de X, debe 
estar comprendido entre —32768 y 65535. 


Si X es negativo, dará el valor resultante de restar a 65.535 el valor de X. 
(65.535 —X). 


10 PRINT BINS (67) 
(RUN) 
1000011 


OCT$(X) 


Convierte el número decimal X en un número octal. El valor de X, debe 
estar comprendido entre —32768 y 65535. 


Si X es negativo, dará el valor resultante de restar a 65.535 el valor de X. 
(65535—X). 


10 PRINT OCTS (76) 


(RUN) 
114 


HEXS (X) 


Convierte el número decimal X en un número hexadecimal. El valor de 
X, debe estar comprendido entre —32768 y 65.535. 


Si X es negativo, dará el valor resultante de restar a 65.535 el valor de X. 
(65535 —X). 


10 PRINT HEXS (94) 


(RUN) 
5E 


VAL (X$) 


Determina el valor numérico de los primeros caracteres numéricos de 
X$. 


10 AS = "125443" 
20B$ = “15C" 
30 PRINT VAL (AS) 
40 PRINT VAL (AS)+VAL (BS) 
50 PRINT VAL (AS+BS) 
(RUN) 
125 
140 
12515 


STR$ (X) 


Realiza la función inversa de VAL (X$). 


10 A$ = STR$ (22) 
20B$ = “BASIC” 
30 PRINT AS + BS. 
(RUN) 
22 BASIC 


) 


) 


y 6 ds 
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8. CADENAS DE CARACTERES 


e RIGHTS 

e LEFTS 

e MID$ 

e STRING$ (N,X) 
e STRINGS$ (N,X$) 
e SPACES 

e INSTR 

e LEN 


RIGHT$<(X$,N)> 
Extrae N caracteres de la cadena X$ empezando por la derecha. 


SiN = LEN (X$), nos dará X5 


LEFTS <(XS,N)> 
Extrae N caracteres de la cadena X$ empezando por la izquierda. 


10A$ = “BASIC MSX" 
20 PRINT LEFTS (AS,7) 
308$ = LEFTS (A$,3) 
40 PRINT BS 

(RUN) 

BASIC M 

BAS 


MIDS <(X$, N, M)> 
Extrae N caracteres de la cadena X$, empezando por la izquierda, a 
partir de la posición M. 


| 
10 A$ = “ORDENADOR SONY” 


20 B$ = MIDS (AS, 8, 5) 
30 PRINT B$ 
40 PRINT MIDS (“MSX”, 1,2) 
(RUN) 
NADOR SONY 
Ss 


STRING <(N, X)> 
Crea una cadena con N caracteres X, en código ASCII. 


10 PRINT STRING $ (3,65) 
(RUN) 
AAA 


NOTA: El ASCII de 65 es A. 


STRINGS$ <(N, X$)> 
Crea una cadena con N caracteres X$ iguales. 


10 AS = "A" 
20 PRINT STRINGS (5,AS) 
(RUN) 
AAAAA 


SPACES <(X)> 
Devuelve una cadena de X espacios. El valor de X debe estar compren- 
dido entre O y 255. 


10 A$ = SPACES (5) 
20 PRINTAS 


INSTR <(N, X$, YS)> 

Analiza si la variable Y$ está contenida en la variable X$, a partir de la 
posición N. 

X$ e Y$, pueden tener un máximo de 255 caracteres. 


Si Y$ no está contenida en X$, nos dará el valor O. De lo contrario nos 
dará el número de la posición a partir del cual Y$ está contenido en X$. 


20 AS 
20 B$5= 
30 PRINT INSTR (2,A5,,B5) 
(RUN) 
3 


LEN <(X$)> 
Calcula el número de caracteres que contiene la cadena X$. 


10 A$ = “ORDENADOR SONY" 
20 PRINT LEN (AS) 
(RUN) 
14 
10A = LEN (“SONY”) 
20 PRINTA 
(RUN) 
4 


9. PROCESO DE ERRORES 


e ON ERROR GOTO 
e ERL/ERR 

e RESUME 

e ERROR 


ON ERROR GOTO <pn? linea> 
interrumpe el programa principal al producirse un error, pasando a 
realizar la subrutina de interrupción especificada en <n' línea>. 


e<n” linea>): linea inicial de la subrutina de interrupción. 


Una vez activada la interrupción, todos los errores detectados, inclui- 
dos los errores en modo directo (p.e. “Syntax error”) irán a la subrutina 
de error. 


Para desactivar la interrupción de ERROR, debe ejecutarse ON ERROR 
GOTO 0. Los siguientes errores imprimirán en pantalla su mensaje de 
error correspondiente y detendrán la ejecución del programa. 


Una instrucción ON ERROR GOTO 0 que empieza en una subrutina de 
interrupción de ERROR detendría el programa, imprimiendo el mensaje 
de error que causó la interrupción. 


Si se produce un error durante la ejecución de la subrutina, se imprimirá 
el mensaje correspondiente y se detendrá la ejecución. 


Dentro de una subrutina de ERROR no puede producirse una interrup- 
ción de ERROR. 


ERL/ERR 


Cuando se produce una interrupción de error, la variable ERA contiene 
el código del error producido (ver códigos de error) y la variable ERL 
contiene el número de linea en el que se origino el error 


ERR y ERL se utilizan normalmente con la instrucción IF THEN para 
dirigir el programa hacia una subrutina de error. 

Si la instrucción que motivó el error fué una instrucción en modo 
directo, ERL será igual a 65.535. Para comprobar si se ha producido 
error en una instrucción directa puede utilizarse: IF 65535 = ERL 
THEN... De lo contrario, puede utilizarse: 


IF ERL = <número de linea> THEN... 
IF ERR = <código de error> THEN... 


Al ser ERL y ERR variables reservadas, no pueden aparecer a la iz- 
quierda del signo igual ( = ) en una instrucción LET. 


RESUME 

RESUME O 

RESUME NEXT 

RESUME <núm linea> 

Continua la ejecución de un programa tras haber rectificado el error 
indicado. 


e RESUME o RESUME 0: La ejecución se reanuda en la instrucción que 
causó el error. 


e RESUME NEXT: La ejecución se reanuda en la instrucción siguiente a 
la que causó el error. 


e RESUME <núm. linea>: La ejecución se reanuda en el número de 
línea especificado. 


Una instrucción RESUME que no esté en la subrutina de error, provoca 
el error: “RESUME without”. 


ERROR <códigos> 

Imprime en pantalla el mensaje de error correspondiente al código de 
error especificado en <códigos>, si éste valor es menor de 60. Si 
<código> está comprendido entre 60 y 255 se utiliza para la definición 
de errores por el usuario. 


e<código>: Debe ser un número entero comprendido entre 1 y 255, 
siendo 1 al 59, códigos reservados para el BASIC y el 
resto códigos para definición del usuario. 


10 ON ERROR GOTO 1000 


120 1F A$ = "N THEN ERROR 250 


1000 IF ERA = 250 THEN PRINT “ESTAS SEGURO?" 


Si una instrucción de error especifica un código para el 
cual no se ha definido ningún mensaje de error se produ- 
cirá el error: “Unprintable error”. 


La ejecución de una instrucción de error para la que no 
hay subrutina de interrupción causará el mismo error 
anterior. 


10 ON ERROR GOTO 500 


60 PRINT SQR (—2) 


500 IF ERA = 5 THEN RESUME NEXT 


UY 


10. PANTALLA Y GRAFICOS 


e SCREEN 

e WIDTH 
eCLs 

e COLOR 

e LOCATE 

e TAB 

eSsPCc 

ePOS 

e CSRLIN 

e KEY ON/OFF 
e PSET 

e PRESET 

e LINE 

e CIRCLE 

e PAINT 

e DRAW 

e SPRITES 

e PUT SPRITE 
e POINT 

e BASE 


SCREEN <modo>, <tamaño Sprites>, <sonido teclado>, <veloci- 
dad de transmisión>, <impresora> 
Define los parámetros especificados. Dos | 


e<modo>: Selecciona la pantalla para trabajar con texto ó con gráfi- 

COS. 

e O: Modo texto (40 x 24) 

e 1 ; Modo texto (32 x 24) 

e 2: Modo gráfico (256 x 192) 

e 3: Modo gráfico (256/4 x 192/4) 
Cada punto en modo 3, corresponde a 16 puntos en modo 2. 
(4 x 4) 


*e<tamaño Sprites>: Determina el tamaño del Sprite 
e0:8x 8normal 

e 1:8 x Bampliado 

e 2:16 x 16 normal 

e 3: 16 x 16 ampliado 


e<sonido teclado>: Habilita ó inhibe el sonido producido al pulsar 
una tecla. (“clik”). 

e 0: sinsonido 

e 1: consonido 


e<velocidad de transmisión>: Determina la velocidad de transmi- 
sión de un programa en cassette. 

e 1:1.200 Baudios. 

e 2: 2.400 Baudios. 


La velocidad de almacenamiento (cassette), también puede determi- 
narse con el comando CSAVE, utilizando la opción <velocidad>. 


*<impresoras>: Especifica si la impresora conectada es MSX o no. 
Si la impresora no es MSX, los símbolos gráficos son convertidos a 
espacios. 

: MSX 

e 1: no MSX 


WIDTH <(X)> 
Proporciona una pantalla con X caracteres por línea en modo texto, 
(ver comando SCREEN) 


e <(X)>: número de caracteres por línea. Debe ser un entero com- 
prendido entre O y 39 en modo 40 x 24 o entre 0 y 31 en 
modo 32 x 24, 


CLS 
Borra el contenido de la pantalla, manteniendo el programa almace- 
nado en memoria. 


COLOR <X>, <Y>, <Z> 
Define el color de la pantalla. 


e<X>: color de los caracteres. 
*e<Y>: color del fondo, 
e<Z>: color del margen. 


El valor de <X>, <Y> y <Z>, debe ser un entero comprendido entre 0 
y 15. 


Si se omite alguno de estos parámetros, mantendrá el valor anterior. 


Al inicializar el sistema, los valores asignados son X = 15, Y = 4, 
X = 7.(COLOR 15,4,7) 


El color del margen sólo puede visualizarse en SCREEN 1, SCREEN 2, 
y SCREEN 3 (Inicialmente el ordenador está en SCREEN O). 


Código de colores: a] 
0— Transparente 
1— Negro 
2— Verde 


3— Verde claro 

4— Azul oscuro 

5— Azul claro 

6 — Rojo oscuro 

7— Azul celeste 

8—Rojo 

9— Rojo claro 
10— Amarillo oscuro 
11 — Amarillo claro 
12— Verde oscuro 
13— Magenta 


14 — Gris 
15—Blanco 
LOCATE <X>, <Y> 


Situa el cursor en una determinada posición de la pantalla (solo puede 
utilizarse en SCRREN 0 y SCREEN 1). 


e<X>: coordenada horizontal. Debe ser un entero comprendido en- 
tre O y el valor máximo de la anchura de pantalla menos 1. 


e<Y>: coordenada vertical. Debe ser un entero comprendido entre 0 
y22. 


LOCATE se utiliza normalmente para situar el punto inicial de escrí- 
tura utilizando los comandos PRINT e INPUT en la siguiente instruc- 
ción del programa. 


TAB <(X)> 
Desplaza el cursor (X) espacios en sentido horizontal. 


*e<(X)>: número de posiciones a desplazar, Debe ser un entero entre 


0y 255. 
TAB, sólo puede utilizarse con PRINT y LPRINT. 


SPC <(X)> 
Imprime X espacios en la pantalla 


*<(X)>: número de espacios a imprimir. Debe ser un entero entre 0 y 


255, 
SPC, sólo puede utilizarse con PRINT y LPRINT, 


POS <(x)> 
Proporciona la coordenada horizontal actual del cursor. 


e<(X)>: Puede ser cualquier caracter, no influyendo en el resultado. 


APP  __ ==, 


GQ, 


EX EL COCOS E CCE TAE 


10 PRINT POS(A) 


101F POS (1) = 5GOTO 200 


CSRLIN 
Proporciona la coordenada vertical actual del cursor, 


10 PRINT CSRLIN 


10 IF CSRLIN = 15GOTO 200 


KEY ON/OFF 
Visualiza o borra el contenido de las teclas de función en la última 


línea de la pantalla. 


PSET <(coordenadas)>, <color> 
Dibuja un punto en las coordenadas especificadas con el color indi- 
cado. 


Sólo puede utilizarse en modo gráfico (SCREN 2/SCREEN 3). 
PRESET <(coordenadas)>, <color> 

Borra un punto de la pantalla en las coordenadas especificadas. Si se 
especifica el parámetro <color>, actua igual que PSET. 

Sólo puede utilizarse en modo gráfico. (SCREEN 2/SCREEN 3). 


NOTA En modo gráfico, la pantalla queda dividida en una rejilla de 
256 puntos horizontales por 192 puntos verticales: 


(0,0) (256,0) 


(0,192) (256,192) 


10 SCREEN 2 

20 COLOR 1,1,1 

30 FORA = 1TO 500 

40 X = INT (RND(1)* 255) 
Y = INT (RND(1)* 191) 

60 PSET (X,Y), 15 

70 PRESET (X+1, Y+1), 2 

80 NEXTA 

90 GOTO 30 


> 


LINE <(toordenada 1)> - <(coordenada 2)>, <color> 

Dibuja una línea entre los dos puntos especificados, con el color 
indicado, 

Sólo puede utilizarse en modo gráfico. (SCREN 2/SCREEN 3). 


e<(coordenada 1)>: coordenadas del punto de inicio. 
e<(coordenada 2)>: coordenadas del punto final, 

*e<color>: color de la linea. (ver código de colores). 

Si después de <color> se especifica el parámetro B, dibujará un 
rectángulo, teniendo en cuenta que los puntos dados como coorde- 


nadas deben corresponder a una de las diagonales. 


Asi mismo, si en lugar de especificar el parámetro B se especifica BF, 
Ppintará un rectángulo con el color indicado en <color>. 


10 SCREEN 2 

20 LINE (10,10) —(240,10), 1 

30 LINE (20,40)—(90,100), 2, B 
40 LINE (60,70)—(160,180), 8, BF 
50 GOTO 50 


CIRCLE <(coordenadas)>, <radio>, <color>, <ángulo de inicio>, 
<ángulo final>, <excentricidad> 


Dibuja circulos, elipses y arcos según los parámetros especificados. 
Los únicos parámetros obligatorios son <coordenadas> y <radio>. 
(Sólo puede utilizarse en modo gráfico: SCREEN 2/SCREEN 3). 


e <(coordenadas)>: coordenadas del punto central 

e <radio>: radio 

e <color>: color (ver código de colores) 

e <ángulo inicial> <ángulo final>: ángulo inicial y final de la figura. 
Deben expresarse en radianes, entre 0 y 2 x. Si el ángulo es negativo, 
la elipse se conectará al punto central con una linea, y el ángulo será 
tratado como si fuera positivo. (Observe que esto es distinto a sumar 
21). 


<excentricidad>: Relación entre los ejes horizontal y vertical. 
Si <excentricidad> = 2, el eje horizontal será la 
mitad del vertical, permitiendo así definir la forma 
deseada en la elipse. 


5 SCREEN 2 
- TO CIRCLE (125, 96), 70 
10 CIRCLE (125, 96),70,1,,, 1.2 


10 CIRCLE (125, 96), 70, 1, 0, 2*3.14, 2 
10 CIRCLE (125, 96), 70, 1, 0,2*3.14, 5 
10 CIRCLE (125, 96)70, 1, , ,0 


NOTA Para dibujar un círculo debe especificarse en excentricidad la 
relación 1.2. 


PAINT <coordenadas>, <color 1>, <color 2> 
Rellena de color un contorno cerrado. 
Sólo puede utilizarse en modo gráfico (SCREEN 2/SCREEN 3). 


e<coordenadas>: coordenadas del punto desde donde se empezará 
a pintar. 
£ corresponden a un punto interior del contorno 
cerrado, rellenará de color el interior de dicho 
contorno, dé lo contrario pintará el exterior, 


e<color 1>: color con el que se rellenará el contorno (interior o 
exterior). 


e<color2>: color que limita la superficie a pintar con <color 1>. 
En alta resolución este parámetro no tiene efecto, de- 
biendo ser el color del contorno a pintar del mismo color 
que <color 1>. 


Si no se especifican los parámetros de color, el color utilizado será el - 
primer parámetro del comando COLOR actual. (color de los caracte- 
res). 


10 SCREEN 3 

20 CIRCLE (125, 96), 50, 1 
30 PAINT (125, 96), 2, 1 
40 PAINT (10, 10), 10, 1 E 
50 GOTO 50 EN 


10 SCREEN 2 

20 CIRCLE (125, 96), 50, 1 
30 PAINT (125, 96), 1 

40 GOTO 40 


> 
DRAW 


Sentencia de ejecución de los comandos del Macro lenguaje gráfico. 
(ver Anexo de gráficos). — 


SPRITES 
Variable especial del sistema utilizada para la definición de gráficos 
SPRITE. (Ver Anexo de gráficos). 


PUT SPRITE <n* plano>, <coordenadas>, <color> 
Asigna a un SPRITE los atributos especificados. 
(Ver Anexo de gráficos). 


POINT <(x,y)> 

Ofrece el código de color de un punto de la pantalla. 

e <(x,y)>: coordenadas del punto. 
Si están fuera del rango de visualización, el valor obtenido 
es—1 

BASE <(x)> 

Ofrece la primera dirección de las tablas del procesador de video 

(VDP) 


e <(x)>: Debe ser un número entero positivo comprendido entre Zy 


(Para más información, ver anexo 3 Información Técnica”). 


| 
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11. SONIDO 


e BEEP 

e SOUND 
e PLAY 

e PLAY (N) 


BEEP 
Genera el sonido «Bip». (CTRL-G). 


SOUND <registro del PSG>, <valor> 
Escribe directamente el valor especificado en el registro indicado del 
Procesador generador de sonido. (PSG). 


Registros del PSG 


N? de registro 


Función 


Frecuencia canal A. 


Frecuencia canal B 


Frecuencia canal C 


Valor 


0-15 
6 Frecuencia de ruido 0-31 
Selecciona un canal 
7 para generación de 0-63 
tonos y ruido 
=| 
8 Volumen canal A 0-15 


10 


Volumen canal B 


Volumen canal C 


La variación de volumen 
tendrá lugar cuando 
se seleccione 16 


13 


Frecuencia del patrón 
de variación de volumen 


Selección del patrón 
de variación de volumen 


0-255 


0-14 


EXC ECE METE CAU ESE CENTER OD 


10 FORI=1T050 
20 SOUND 6,0 

30 SOUND 7, 55 

40 SOUND 8, 16 

50 SOUND 11, 23 

60 SOUND 12, 2 

70 SOUND 13, 9 

80 FOR X= 1TO 100: NEXTX 
90 NEXT! 

100 FORI=1T0 10 

110 SOUND7, 55 

120 SOUND 6, 0 

130 SOUND 8, 16 

140 SOUND 11,50 
150 SOUND 12, 47 
160 SOUND 13, 0 

170 FOR X = 1TO 100: NEXTX 
180 NEXT! 

190 GOTO 10 


PLAY <expresión para VOZ 1>, <expresión para VOZ 2>, <expre- 
sión para VOZ 3> 


Es la sentencia de ejecución de los comandos del macro lenguaje 
musical. Puede interpretar tres voces simultáneamente, en un rango 
de ocho octavas. (ver anexo ll: sonido). 

PLAY (N) 

Comprueba si se está ejecutando música. 


e SiN = 1,2, 6 3, da el valor -1 si se está ejecutando música, de lo 
contrario da el valor 0. 


e SiN = 0, el estado de cada comando del macrolenguaje musical (-1 
Ó 0) se opera con OR exclusive y da el resultado obtenido. 


12. ALMACENAMIENTO EN CASSETTE 


e CSAVE 

e CLOAD 

e CLOAD? 

e SAVE 

e LOAD 

e BSAVE 

e BLOAD 

e MERGE 

e MOTOR ON/OFF 


CSAVE "<Nombre del Programa>", <velocidad> 
Almacena en cassette un programa BASIC con el nombre especifi- 
cado en “<nombre del Programa>". 


El formato utilizado es el Binario comprimido, que ocupa menos 
espacio que el ASCII, aunque algunos tipos de acceso, requieren que 
los ficheros estén almacenados con este formato. Por ejemplo, si 
queremos mezclar dos programas, uno de ellos debe estar en código 
ASCII. (ver comando MERGE). 

El comando SAVE, realiza el almacenamiento en formato ASCII, 


*e*<nombre del programa>": Nombre asignado al programa en el 
momento de grabarlo en cassette, 
Para cargar el programa desde cas- 


sette a memoria, utilizaremos este 
mismo nombre. El número máximo de 
caracteres significativos es 6. 


e<velocidad>: Determina la velocidad de grabación: 
1: 1,200 Baudios 
2: 2.400 Baudios 
Este parámetro es optativo, ya que si no se específica, 
el ordenador asignará por defecto el valor 1 


CSAVE “PROG” 


CSAVE “PROG1”, 2 


CLOAD “<nombre del programa>"” 


Carga el programa especificado en «<nombre del programa>», 
desde cassette a la memoria interna del ordenador, borrando el conte- 
nido actual de la memoria. Anteriormente, dicho programa fué alma- 
cenado en cinta con el comando CSAVE. 


CLOAD “PROG” 


CLOAD? “<nombre del programa>" 

Carga un programa almacenado en memoria externa (cassette) a la 
memoria interna del ordenador sin borrar el contenido actual de la 
memoria interna, estableciendo una comparación entre el programa 
que está cargando y el que está residene en memoria. 


Su función es comprobar si la grabación efectuada con CSAVE ha 
sido correcta. En caso de grabación incorrecta se producirá el error: 
“Verify error." 


Una vez grabado el programa en cassette mediante CSAVE, se rebo- 
bina la cinta hasta el punto inicial de grabación y se teclea en el 
ordenador CLOAD? seguido del nombre del programa (enmarcado 
entre comillas). Después, daremos la orden de ejecución pulsando la 
tecla RETURN y pondremos el cassette en marcha. 

Si la grabación ha sido correcta, aparecerá «OK», en caso contrario se 
imprimirá el mensaje de error correspondiente. 


CLOAD? “PROG” 


oK 


SAVE “<nombre del programa>" 


Almacena en cassette un programa BASIC en formato ASCII con el 
nombre especificado en “<nombre del programa>". 


SAVE “PROG” 


LOAD "<nombre del programa>"” 

Carga el programa, especificado en “<nombre del programa>"”, 
desde cassette a la memoria interna del ordenador. Anteriormente, 
dicho programa fué grabado con SAVE. 


E LOAD “PROG” 
C 


EXCPFAATEAE CENTRA 


( 


a 
Si después de “<nombre del programa>" se añade:, R, el programa 

pu se ejecutará automáticamente sin necesidad de utilizar el comando 

a RUN. 

"a | LOAD "PROG 1”,R | 

a 


BSAVE “*<CAS: Nombre del programa>"”, <dirección inicial>, <direc- 
ción final>, <dirección de ejecución>. 


Almacena en cassette un programa en lenguaje máquina localizado 
C en las posiciones de memoria indicadas. (Desde <dirección inicial> 
hasta <dirección final>). 


= Si se omite el parámetro <dirección de ejecución> se asignará por 
defecto el valor de <dirección inicial>, sino, el programa se ejecutará 
a partir de esta posición cuando sea cargado con BLOAD. 


= BSAVE “CAS: TEST", 8HA000, 8HAFFF 
= BSABE “CAS: GAME”, £HE000, ¿HEOFF, £HE020 


BLOAD "<CAS: Nombre del programa>" 
Carga desde cassette, un programa en lenguaje máquina, que fué 
grabado mediante BSAVE. 


Si después de "CAS: Nombre del programa>” se añade: , R, el pro- 
grama se ejecutará inmediatamente desde la dirección que se especi- 
fica al grabarlo con BSAVE. El programa, se almacenará en las mis- 
mas posiciones de memoria especificados en BSAVE. 


BLOAD “CAS TEST 


MERGE “<nombre del programa>" 

Mezcla el programa especificado en "<nombre del programa>", con 
el residente en memoria. El programa especificado debe ser un pro- 
grama en formato ASCII (almacenado mediante SAVE). 


Si ambos programas tienen algún número de línea común, el conte- 
nido final de esta linea será el correspondiente al programa en for- 
mato ASCII. 


MOTOR ON/OFF 


Pone en marcha o detiene el cassette cuando se utiliza el control 
remoto. 


Si MOTOR no va acompañado de argumento (ON/OFF) pondrá en 
marcha/detendrá el cassette secuencialmente. Es decir, si el cassette 
está parado lo pondrá en marcha y viceversa. 


Si se utiliza el control remoto, todas las instrucciones de ficheros 
como CLOAD, CSAVE, PRINT+, INPUT+...... etc., activarán automáti- 
camente el cassette. 


CONSEJOS PRACTICOS PARA LA UTILIZACION 
DEL CASSETTE 


e Utilice siempre un cassette monofónico. En caso de utilizar un 
cassette stereo, perderia parte de la información 


e Ponga el volumen del cassette a un nivel MEDIO-ALTO, La graba- 
ción estará sometida a interferencias si el volumen está demasiado 
bajo. Por otra parte, si el volumen está demasiado alto, puede 
producirse distorsión en la señal de salida. 


e Si su cassette tiene control de TONO, sitúelo en una posición alta 
(HIGH), ya que la grabación contiene principalmente frecuencias 
altas. 


e Compruebe que las pilas de su cassette están en buen estado. 
Recomendamos la utilización de un alimentador. 


e Compruebe que el cabezal está en buenas condiciones de limpieza. 


e Procure utilizar siempre el mismo cassette para la grabación y 
carga de programas, ya que entre distintos aparatos pueden existir 
pequeñas diferencias (velocidad del motor. ajuste de cabezales. 
etc.). que pueden ocasionar errores de carga. 
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13. FICHEROS 


e OPEN 4 

e MAXFILES 

e PRINT Y 

e PRINT % USING 
e INPUT 4 

e INPUT$(n, 4) 

e LINE INPUT 4 
eEOF 

e CLOSE 4 


OPEN "<periférico>: <nombre fichero>" FOR <modo> AS + <núm. 
fichero> 

Abre un fichero en el periférico especificado, asignándole un número 
determinado que será utilizado por otros comandos de Entrada/Sa- 
lida para especificar el fichero con el que van a trabajar. 


e<periférico>: CAS: cassette 
CRT: pantalla. 
GRP: pantalla de gráficos. 
LPT: impresora. 


e<modo>: OUTPUT: salida secuencial de datos. 
INPUT: entrada secuencial de datos. 
APPEND: adición de datos. 


e<núm. fichero>: Debe ser un número entero comprendido entre 1 y 
el valor especificado en la sentencia MAXFILES. 
Este número quedará asociado al fichero en cues- 
tión, pudiendo hacer referencia a él otros coman- 
dos de E/S (PRINTx, INPUT+.,...), utilizando dicha 
asignación. 


Abre el fichero DAT almacenado en cassette (CAS) en modo salida 
(OUTPUT), asignándole el número 1, (4 1) 


NOTA: Para introducir texto trabajando con pantalla de gráfico - 
(SCREEN 2/SCREEN 3), deberá realizar un OPEN «GRP:" 
FOR OUTPUTAS 4 1. 


La Linea 30 sitúa el punto inicial de escritura. 
MAXFILES = <núm. ficheros> 

Especifica el número máximo de ficheros que estarán abiertos simul- 
táneamente en un programa. 

Si MAXFILES = 0, sólo podrán utilizarse los comandos SAVE y LOAD. 


El valor asignado por defecto es 1. (MAXFILES = 1). 


MAXFILES = 5, indica que en el transcurso del programa, podemos 
tener un máximo de 5 ficheros abiertos (OPEN) simultáneamente. 


PRINT4 <núm. fichero>, <lista de datos> 
PRINT 4 <núm. fichero>, USING <expresión>: <lista de datos> 


— Escribe datos en el fichero especificado que posteriormente podrán ! 


— ser leidos mediante la sentencia INPUT %. 


pa 
au 
Gu 
a 
ú 
a 

a 
a 
a 
a 
a 


( 


ADV ONO DA 


( 


Antes de efectuar una operación de escritura, debe abrirse el fichero 
en modo salida (OUTPUT). 


(Ver PRINT/PRINT USING para más detalles) 
INPUT 4 <núm. fichero>, <lista de variables> 


Lee datos desde el fichero especificado asignádolos a las variables 
indicadas en <lista de variables>. 

Los datos del fichero, estarán almacenados en el mismo orden en que 
fueron escritos por el comando PRINT %, por lo que para asignarlos a 
las variables del programa deberemos conocer dicho orden. 


e<núm. fichero>: Es el número con que fué abierto (OPEN) el fi- 
chero. 


e<lista de variables>: Pueden ser numéricas o alfanuméricas, de- 
biendo estar separadas por coma. 


Antes de efectuar una operación de lectura, debe abrirse el fichero en 
modo entrada. (INPUT): 


INPUTS (n, ++ <núm, fichero>) 


Lée una secuencia de n caracteres en el fichero especificado, asig- 
nándolos a una variable. 


*<número de fichero>: es el número con el que fué abierto (OPEN) 
el fichero. 


Antes de efectuar una operación de lectura, debe abrirse el fichero en 
modo entrada (INPUT): 


LINE INPUT + <núm. fichero>, <variable> 

Lee una línea entera (hasta 254 caracteres) del fichero especificado 
sin utilizar delimitadores, asignando la cadena a una variable alfanu- 
mérica, 


e<núm. fichero>: es el número con el que fué abierto (OPEN) el 
fichero. 


e<variable>: es la variable a la que se asignara la secuencia de 
caracteres leídos. Debe ser una variable alfanumérica. 


LINE INPUT 4, lée todos los caracteres, hasta encontrar un RETURN. 
El próximo LINE INPUT 4 , empieza a leer desde éste punto hasta el 
próximo RETURN y asi sucesivamente. 


Este comando es especialmente útil en aquellos programas que de- 
ben colocar cada línea de un fichero en un campo determinado o para 
programas que deben leer datos de otro programa almacenado en 
ASCII. 


Antes de efectuar una operación de lectura, debe abrirse el fichero en 
modo entrada (INPUT): 


EOF (<núm. fichero>) 

EOF tomará el valor —1 si se ha llegado al final de un fichero secuen- 
cial, (EOF = -1). 

Utilice EOF durante la lectura de un fichero para evitar errores tipo 
“Input pastend”. 


CLOSE 4 <núm. fichero>, <núm. fichero> 
Cierra el fichero ó ficheros especificados en <núm. fichero>. 
Si no se indica <núm. fichero>, cerrará todos los ficheros abiertos. 


GUTUTCOOOOUCOL 


CG 


¡a 


NOTA: Las operaciones a realizar cuando trabajamos con ficheros 
pueden esquematizarse según el siguiente organigrama: 


| 
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ANEXOS: 


1. GRAFICOS 

2. SONIDO 

3. INFORMACION TECNICA 
4. PROGRAMAS 

5. CODIGOS DE ERROR 


w 


ey 


ANEXO 1: GRAFICOS 
INTRODUCCION 


1 


Además de las funciones gráficas vistas anteriormente (LINE, CIRCLE, 
PSET...), el HIT BIT nos ofrece nuevas opciones: 

— Macro lenguaje para gráficos 

— Gráficos SPRITE 


Todas las funciones gráficas, pueden utilizarse conjuntamente, traba- 
jando en modo gráfico (SCREEN 2, SCREEN 3). 


MACRO LENGUAJE PARA GRAFICOS 


Utilizando este macro lenguaje, podremos acceder a todos los puntos de 
la pantalla en modo gráfico (256 x 192), para realizar cualquier dibujo. 
Para ello, utilizaremos la sentencia DRAW, que tiene el siguiente for- 
mato: 


DRAW <expresión string> 


Los comandos del macro lenguaje, son letras que indican el movimiento 
arealizar, y forman parte de la expresión string. El string define un objeto 
que será dibujado al ejecutar la sentencia DRAW, 


Al utilizar los comandos de movimiento (ver tabla 1), hay que tener en 
cuenta que el movimiento se iniciará desde el último punto referenciado. 
Es decir, si inicialmente estamos en (5,20) y ejecutamos un R5 (desplaza- 
miento de 5 puntos a la derecha), el punto final será (10,20), siendo éste, 
el punto de inicio del próximo comando, 


EE-- HeepRIOnóAn A 


TABLA |: Comandos de movimiento 


n, indica la distancia de movimiento. El número de puntos desplazados > 
será n veces el factor de escala. (indicando por el comando S). 


Mx. y, indica desplazamiento absoluto ó relativo. Sise indica X+ ó X—, el 
desplazamiento será relativo, de lo contrario el desplazamiento 
será absoluto. = 


La proporción de la pantalla es 1:1; Es decir que 8 puntos horizontales 
tienen la misma longitud que 8 verticales. 


COMANDO | MOVIMIENTO 


Y 
D 
L 
R 
E 
F 
G 
H 
M 


n 
n 
n 
n 
n 
n 
n 
n 
yy 


Todos los comandos indicados, al ser ejecutados mediante la sentencia - 
DRAW, dibujarán siempre el recorrido programado. Si en algún mo- 

mento queremos desplazarnos hasta un punto determinado sin dibujar 

la trayectoria seguida ó queremos dibujarla volviendo al punto inicial, sl 
utilizaremos los siguientes prefijos: 


B: desplazamiento sin dibujar trayectoria = 
N: desplazamiento dibujando trayectoria y volviendo al punto de 
inicio, > 


Así por ejemplo, normalmente lo primero que tendremos que hacer para 
empezar un dibujo, será situar el cursor en la posición inicial sin dibujar 

la trayectoria seguida. Esto podemos hacerlo mediante el comando 

BMx, y, donde «x,y» son las coordenadas iniciales hasta donde quere- 

mos trasladarnos, (Mx y, dibujaría la trayectoria seguida hasta el punto = 
x.y). 


Otros comandos que pueden utilizarse con este macro lenguaje son: - 


A 7 


( 


( 


An: Permite movimiento en el ángulo n, que puede ser de 0 a 3 
(0 =0%, 1 = 90%, 2 = 180%, 3 = 270%). 


— 
2 


Cn : Da color a los puntos dibujados (n = 0 — 15), Ver código de 
colores. 


Sn : Indica el factor de escala. El valor de n debe ser un número entero 
comprendido entre O y 255. El factor de escala será n/4. Por 
ejemplo, sin = 1, el factor de escala será 1/4. 

El factor de escala multiplicado por la distancia indicada (n) en los 
comandos de movimiento U,D,L,R,E,F,G,H,M, nos dará el número 
de puntos desplazados. 

Si no se indica factor de escala, el valor por defecto será n = 4 
(S4). 


X <variable string; >: Este comando permite ejecutar un segundo string 
desde otro string. 


Dibujo de un cuadrado: 


BM 70, 150 coloca el punto inicial del dibujo en (70, 150), de otra forma, 
el punto inicial sería (0, 0) y no podríamos visualizarlo. 


El comando X, es una parte muy útil de DRAW, pues permite definir 
partes de un objeto separadas del conjunto. Así por ejemplo, si en un 
dibujo hay un elemento que debe aparecer en distintas posiciones pode- 
mos definir este elemento con el comando X, evitando así el tener que 
programarlo cada vez que queremos dibujarlo. 


Dibujo de una casa 


1?) Hacemos el dibujo en una hoja de papel cuadriculada con un factor 
de escala de 1 cuadro = 5 puntos y fijamos el punto de inicio en (A) 


A 
70,160 90,160 


2”) Hacemos el programa del dibujo, dividiéndolo para mayor comodi- 


dad en 5 partes: 


A$ = contorno casa 
BS = chimenea 
C$ = ventana 

D$ = puerta 

E$ = humo 


= "U4ONGH5E25F30H5D40L50” 
= "U20R10D10” 
"U1OR10D10L10” 
"U20R10D20” 

ES = "E10U5E10” 


3”) Determinamos los puntos de inicio de cada objeto: 


A$ — CASA 
B$ — CHIMENEA 
C$ — VENTANA 1 
C$ — VENTANA 2 
D$ — PUERTA 
ES — HUMO 


A (70, 160) 
B (75,115) 
C (75, 140) 
D(105, 145) 
E (90, 160) 
F (80, 90) 


Antes de hacer el dibujo de cada objeto, colocaremos el cursor en los 
puntos correspondientes, mediante el comando MBx,y. 


El programa completo será el siguiente: 


10 SCREEN 2 


: 30 8$ = "U20R10D10” 

É 40 CS = "U1OR10D10L10" 
50 DS = “U20R10D20” 

60 E$= “E10USE10” 

70 DRAW “BM70, 160XAS;” 
E 80 DRAW “BM75, 115XBS;” 
o 90 DRAW “BM75, 140XC8;” 


110 DRAW“'BM90, 160XD: 
120 DRAW “'BM80, 90XES:” 
130 GOTO 130 


20 A$ = "U4ONG5E25F30H5D40L50" 


100 DRAW "BM105, 145XC8;” 


PR RAR A o 


Para mayor comodidad podemos hacer todo el dibujo con una sola 
instrucción. Para ello sustituiriamos las lineas 70-130 por: 


145 X C$; BM 90, 160 XDS; BM 80, 90 XES; 
80 GOTO 80 


70 DRAW "BM70, 160XAS; MB 75, 115 XBS; BM 75, 140XC$: BM 105, 


o Q mm A — 


PROGRAMA EJEMPLO UTILIZACION MACRO LENGUAJE PARA 
GRAFICOS 


5 REM$MACRO LENGUAJE GRAFICOS 

10 SCREEN2 

20 REM:A$ = PERFIL CASA. 

30 A$= "BM70,130U60BD60R60USOBL3OBU4ONF40NGA0D2NF38NG38" 
40 REM:B$ = PUERTAS/VENTANAS. 

50 B$ = "BM80,70R10D20L10U20BR30R10D20L10U20BM90, 
100R20D30BL20U30BM82,70D20BR2U20BR2D20BR2U20BM112, 
70D20BR2U20BR2D20BR2U20BM92,100D30BR2U30BR2D30BR2U30BR2 
D30BR2U30BR2D30BR2U30BR2D30” 

55 REM:C$ = CHIMENEA/HUMO. 


58 C$ = "BM8050U15R10D5BM90,30E10U10E10BD10R10D10 
L10U10DB10BR20U10F10UTOBRIOFSNE5DS” 


60 REM:D$ = PAJAROS. 

70 D$= "BM170,30F10E10BM190,40F10E10” 

80 REM:E$ = CARTEL. HIT BIT 55. 

90 E$ = "BM170,120R60D50L60U50BM180, 

140 U10D5R5D5BR5USBU2U1BM195, 

140 UTONL2NR2BR10D10U5SR5DS5L5BR10U5BU2U1BM220, 
140 UTONL2NR2BM190,160R5U5L5USRS5BD10BR10RSUSLSU5RSBM190, 
130 D20R20U20" 

100 REM:F$ = CAMINO. 

110 F$= "BM90,140F10G10F10BM110,140F10G10F10” 
150 DRAW"XAS;" 


160 DRAW"XBS;” 


124) 170 DRAW“XCS;" 


180 DRAW"XDS;” 

190 DRAW"XES;” 

200 DRAW"XFS;” 

250 FORI=0TO 5000 

260 NEXT! 

270 A = RAND(1)*15 

280 B = RND(1)*15:C = AND(1)*15 


290 COLORA,B,C 


300 GOTO 10 


- 2. GRAFICOS SPRITE 


Hasta ahora, para representar gráficos en movimiento hemos utilizado la 
sentencia PRINT. Esta forma de representación para la animación grá- 
y fica, resulta muy limitada, debido principalmente a que al utilizar la 
sentencia PRINT, los objetos representados deben crearse a partir de 
los símbolos gráficos existentes, por lo que la forma y resolución del 
objeto, no puede ser lo buena que se requiere. 
Por otra parte, el movimiento del gráfico por la pantalla requiere un 
número de instrucciones para controlar su situación. 


Veamos un ejemplo: el siguiente programa simula el vuelo de una nave 


espacial: 
10 CLS 
20 FORA =0TO26 
30 LOCATE A,10 
40 PRINT“XOX" 
50 FORI=1TO40 
60 NEXT! 
70 LOCATEA, 10 
80 PRINT* 


90 NEXTA 


A O A AAA 


Al ejecutar el programa en el ordenador, se observar que la nave espacial 
(XOX) no ha salido muy favorecida, debido a las causas citadas anterior- 
mente, y el control de su movimiento puede llegar a complicar bastante 
el programa si pretendemos que el objeto se mueva por distintas direc- 
ciones... Todos estos inconvenientes quedan subsanados utilizando los 
gráficos SPRITE del HIT BIT, ya que podemos dar al objeto la forma 
deseada, situarlo en cualquier posición de la pantalla, darle una direc- 
ción y velocidad... etc. 


¿Qué es un SPRITE? 
Un SPRITE, es un objeto programable, que puede definirse facilmente 
en BASIC. 


SPRITE, es el nombre que recibe la forma de lograr imágenes más 
naturales, y más facilmente en un ordenador, En los gráficos convencio- 
nales, las imágenes se componen en una pantalla simple, como si se 
dibujara en una hoja de papel. Con los SPRITES, el ordenador tiene 
varios planos, cada uno de los cuales contiene su propia imágen. En el 
caso del HIT BIT, disponemos de 32 planos distintos. 


La manera más sencilla de representar estos planos, consiste en imagi- 
narse láminas de plástico transparente. Si la lámina más cercana al 
observador contiene el dibujo de una estrella, mientras que la última 
incluye la imágen de una nave espacial, ésta será vista pasar por detrás 
de la estrella, como si realmente estuviera flotando en el espacio. 


Al poner varios elementos en planos separados, podrán crearse efectos 
tridimensionales muy convincentes. 


Otra caracteristica importante de este tipo de gráficos es que para darles 
movimiento tan solo hay que especificar una velocidad y una dirección, 
olvidándonos por completo de cómo fué definido. 


Veamos como mejora el aspecto de nuestra nave espacial utilizando 
SPRITES; Ejecute el siguiente programa: 


10 COLOR 15,4,7 
20 SCREEN 2,0 
30 CLS 


40 SPRITE $ (0) = CHR$(8B00000000) + 
+ CHR$(8B00000000) + CHA$(8B00100100) + 
+ CHR$(8800111100) + CHAS(8B01011010) + 


Comandos para la utilización de SPRITES en el HIT BIT 


Los comandos utilizados en el HIT BIT para la realización de gráficos 
SPRITE, son los siguientes: 


e SPRITE $ (n) 

e PUT SPRITE 

*e ONSPRITE GOSUB 

e SPRITE ON/OFF/STOP 


SPRITE $ (n) = <definición SPRITE> 
Define la forma del objeto. El número de plano (n) debe ser un número 
entero entre 0 y 31. 


Para definir el SPRITE, nos auxiliaremos de una cuadrícula de 8 x 8: 


A 


Dentro de esta cuadricula, dibujaremos el SPRITE y a continuación, al 
lado de cada linea, codificaremos su contenido según el siguiente 
criterio: 


— Si una casilla está en blanco, le asignaremos el valor “O”. 
— Si una casilla está pintada, le asignaremos el valor “1”. 


Finalmente, como estos valores obtenidos son binarios, se lo indicare- 
mos al ordenador mediante el prefijo “2B” (si conoce el lenguaje bina- 
rio, puede codificar estos valores en decimal). La definición del SPRITE, 
estará formada por la suma de los 8 CHR$ correspondientes a los valores 
decodificados. 


Veamos como construiriamos la nave espacial del ejemplo anterior: 


1% Hacemos el dibujo en la cuadricula. 
2” Decodificamos las líneas de la cuadricula. 
3” Definimos el SPRITE como la suma de los 8 CHR$ decodificados. 


1” Dibujo 


2” Decodificación 


3" Asignación 


SPRITES (0) = CHR$ (8800000000) + 

+ CHR$ (4800000000) + CHR$ (4800100100) + 
+ CHR$ (8800111100) + CHAS (8801011010) + 
+ CHR$ (8810011001) + CHAS (4801111110) + 
+ CHR$ (8800100100) 


Una forma más cómoda de definir el SPRITE es utilizando READ/DATA: 


10 COLOR 15,4,7 

20 SCREEN 2,0 

30 CLS 

40 FORX=1T08 

50 READ AS(X) 

60 B$= BS +CHR$ (VAL(“3B" + AS(X)) 
70 NEXT X 

80 SPRITES(0) = BS 

90 PUT SPRITE O, (5,70) 

100 FOR|= 170 256 

110 PUT SPRITE 0, STEP (1,0), 15 
120 NEXT! 

130 DATA 00000000 

140 DATA 00000000 

150 DATA 00100100 

160 DATA 00111100 

170 DATA01011010 

180 DATA 10011001 

190 DATA 01111110 

200 DATA 00100100 


A - 


Si queremos que nuestra «nave espacial» aparezca más grande, susti- 
ruiremos la línea 20 por: 


20 SCREE! (ver sentencia SCREEN) 


También podemos trabajar con SPRITES de 16 x 16 (ampliables con 
SCREEN 2,3). El procedimiento será el mismo que en 8 x 8, teniendo en 
cuenta que la cuadrícula será de 16 x 16 y por lo tanto tendremos 16 
líneas de codificación de 16 bits cada una. El principio del programa, 
debemos indicar si trabajamos con SPRITES de 8 x 86 16 x 16 y si van 
aser ampliables: 


SCREEN X,0— 8x8 normal 
SCREEN X,1— 8x8 ampliado 
SCREEN X, 2— 16 x 16 normal 
SCREEN X, 3—16 x 16 ampliado 


PUT SPRITE 
Con esta sentencia definimos los atributos del SPRITE (situación, movi- 
miento, color...). Su estructura es la siguiente: 


A 


PUT SPRITE N, (X, Y), <Color>, <n* SPRITE> 


N = n? plano (0 - 31) 

(X, Y) = situación del SPRITE 

Color = color del SPRITE 

n” SPRITE = indica el SPRITE al que vamos a asignar los atributos 
anteriores. Este número debe ser menor a 256 si el tamaño 
del SPRITE es 0 ó 1 y menor a 64 si el tamaño es 2 6 3 (ver 
sentencia SCREEN) 


Para poner el SPRITE en movimiento, le indicaremos los saltos (STEPS) 
que debe realizar a partir de su posición inicial. Asi pues, normalmente 
utilizaremos 2 veces la sentencia PUT SPRITE: una para colocarlo en la 
posición inicial y otra para indicarle el movimiento a realizar. 


En el ejemploll, la línea 50 coloca el SPRITE en la posición inicial (5,70) y 
en la línea 70 le especificamos que desde la posición anterior, debe 
moverse con saltos de (1,0). (desplazamiento horizontal). Si en lugar de 
STEP (1,0) especificamos STEP (0,1), el movimiento será vertical. 


Si queremos que nuestra nave espacial se mueva siguiendo la trayecto- 
ria de una sinusoide, cambiaremos las siguientes líneas de programa del 
ejemplo anterior: 


60 FOR X= 11TO 256 STEP 3 - 


70 PUT SPRITE O, (X, SIN (X/4)*20 + 70) 


Con las siguientes modificaciones obtendremos un movimiento aleato- 
rio: 


50 PUT SPRITEO, (127,96) 

60 X = INT (RND)(1)*20)*(-1)- Y:Y = INT(RND(1)"20):£-1)-X 
70 PUT SPRITE 0, STEP (X.Y) 

80 FOR T=1TOS0: NEXT 

90 GOTO 60 


ON SPRITE GOSUB <n' linea> 

Esta sentencia hará que el programa principal salte a la subrutina de 
servicio, cuya línea de inicio es la indicada en <n” de línea>, cuando 
«chocan» dos SPRITES, si anteriormente se ha habilitado la interrup- 
ción mediante SPRITE ON. 


SPRITE ON/OFF/STOP 
Para activar/desactivar las interrupciones de SPRITES. 


SPRITE ON: Activa la interrupción 

SPRITE OFF: Desactiva la interrupción 

SPRITE STOP: Si se produce interrupción, la memoriza, pero no salta a 
la subrutina de servicio hasta que se active la interrup- 
ción mediante SPRITE ON 


Antes de la sentencia ON SPRITE GOSUB, hay que especificar si la 
interrupción está activa o no. (SPRITE ON/OFF/STOP). Si se produce 
interrupción, con SPRITE ON, automáticamente se producirá un 
SPRITE STOP, y pasaremos a realiar la subrutina de servicio. 


VARIACION DE LA FORMA DEL OBJETO CON EL MOVIMIENTO 


Hasta aqui, hemos visto cómo mover un SPRITE por la pantalla sin variar 
su forma inicial. Si queremos que nuestro objeto dé más sensación de 


HA AA 


movimiento (moviendo las piernas y los brazos al andar, por ejemplo), 
tendremos que crear tantos SPRITES como movimientos distintos ten- 
gamos. Es decir, tendremos que hacer un estudio del movimiento a 
realizar y definir un SPRITE para cada movimiento (imagínese el movi- 
miento en cámara lenta). 


Veamos como visualizar un SPRITE que está «corriendo» 
Los movimientos realizados al correr serán 5: 


T A m1 H 
a je AAA 
HA E H ? q 


Porllo tanto, utilizaremos 5 SPRITES (SPRITES (0) - SPRITES (4)). 
El programa será el siguiente: 


10 COLOR 15,4,7 

20 SCREEN 1,0 

30 CLS 

40 FORL=0TO4 

50 FORI=1T08 

60 READ DS(L) 

70 S$(L) = S$(L)+CHRS(VAL(“2B"+DS(L))) 
80 NEXT! 

90 SPRITES(L)=SS(L) 

100 NEXTL 

100 PUT SPRITE 0,(120,90),15,0 
120 FORI=0TO L-1 

130 PUT SPRITE O, STEP(2,0),15,1 
140 FORT = 1TO 20:NEXT 
150 NEXTI:GOTO 120 

160 DATA 00001000 

170 DATA 00001000 

180 DATA 00011100 

190 DATA 00101000 

200 DATA 00001100 

210 DATA 00001010 

220 DATA 00010010 


132 ) | 230 DATA 00010000 


240 REM 

250 REM 

260 DATA 00001000 
270 DATA 00001000 
280 DATA 00011100 
290 DATA 00001010 
300 DATA 00001000 
310 DATA 00010100 
320 DATA 00010010 
330 DATA 00000010 
340 REM 

350 REM 

360 DATA 00001000 
370 DATA 00001000 
380 DATA 00011110 
390 DATA 00001000 
400 DATA 00001000 
410 DATA 00110100 
420 DATA 00000100 
430 DATA 00000100 
440 REM 

450 REM 

460 DATA 00001000 
470 DATA 00001000 
480 DATA 00001100 
490 DATA 00001010 
500 DATA 00000100 
510 DATA 00000100 
520 DATA 00000100 
530 DATA 00001000 
540 REM 

550 REM 

560 DATA 00001000 
570 DATA 00001000 
580 DATA 00001100 
590 DATA 00001000 
600 DATA 00010100 
610 DATA 00000100 
620 DATA 00001000 
630 DATA 00010000 


ANEXO 2: SONIDO 


INTRODUCCION 


Una de las características principales del HIT BIT es que interna- 
mente, lleva incorporado un Procesador generador de sonido que 
le permitirá crear fácilmente sus propias melodías utilizando un 
Macro lenguaje Musical, muy similar al visto anteriormente para 
dibujar. Para ello dispondremos de 8 octavas, 3 Tonos (3 voces si- 
multáneas) y una señal de ruido (para crear efectos especiales). 


MACRO LENGUAJE MUSICAL 

La sentencia de ejecución es PLAY, que realiza una función similar a la 
desempeñada por DRAW, utilizando un macro lenguaje musical dentro de 
una expresión STRING. El formato es el siguiente: 


o. String para VOZ 2>, <exp. String 


<exp. String para VOZ N>, es una expresión String consistente en coman- 
dos musicales de una sola letra. Si no se especifica alguna de las 3 voces, el 
canal correspondiente permanecerá en silencio. 

Las notas musicales pueden especificarse de dos formas distintas: 

19) Utilizando la notación alfabética convencional 


Las notas se representan mediante las letras A-G: 


[e D 13 3 GHPA B 
do | re | mi | fa | sol| la | si 


go 


Para indicar un sostenido, colocaremos el símbolo 4 ó + a continua- 
ción de la nota. Por ejemplo Do sostenido se representará como 
CxÓC+. 


Para indicar un bemol, representaremos la nota con el simbolo —, Así 
D— será Re bemol. 


Unicamente pueden utilizarse los sostenidos y bemoles que correspon- 
den a las teclas negran del piano, no siendo válidas las siguientes 
expresiones: 


..ex (Si sostenido) = C (Do) 
.c— (Do bemol) = B (Si) 
.Es (Mi sostenido) = F (Fa) 
e. (Fa bemol) = E (MI) 


Para indicar la octava correspondiente, utilizaremos el comando On 
(n = 1-8). 

Cada octava va de Do a Si (C —B). Si no se especifica octava, se 
entenderá 04. 


PLAY“C DEF GA B” Escala natural 
PLAY “CC + DD 4 EFF + GG 4 AA + B” — Escala cromática 


10 REM$ ACOMPAÑAMIENTO ROCK $ 

20 A$ = "T23003EG+*BO4C4DCAO3BGA " 
30 B$ = “T23003A04CHEF4GFHEC+4" 

40 C$ = "T23003B04D4+F4GH+AGHFHD+" 
50 FORI= 1T02:PLAYAS: NEXT 

60 PLAYB$: PLAYAS 

70 PLAYC$:PLAYB$ 


80 GOTO 50 


T 230, indica la velocidad de ejecución (ver comando T) 


Utilizando una notación numérica (Nn) 

En lugar de designar las notas con letras (A-G), lo hacemos mediante 
números: Nn (n = 0 - 96). Esta es una forma de seleccionar las notas sin 
tener que especificar nombre (A-G), octava ni alteraciones (sostenidos 
y bemoles). La octava 4 corresponderá a la siguiente numeración: 


Cada octava está formada por 12 notas por lo que para calcular el número 
correspondiente a una nota en otra octava, tendremos que sumar/restar 12, 


Así por ejemplo, DO (Octava 4) = 36 (ver Tabla): 
DO (Octava 5) = 36 + 12 = 48 
DO (Octava 3) = 36— 12 = 24 


10 REM $ NOTACION NUMERICA $ 
20 A$= "N36N37N38N39N40N41N42N43N44N45N46N47" 
30 PLAYAS 


COMANDOS MUSICALES 
Dentro de las expresiones anteriores, pueden utilizarse también los siguien- 
tes comandos: 


En : Duración de las notas (n = 1-64) 
La duración será 1/n 


Duración 


Rn 


Si dentro de una expresión queremos variar la du- 
ración de una nota, lo haremos colocando el valor 
al lado de ésta. Así por ejemplo: A16 equivale a 
L16A, pero L16AB es distinto de A16B (debería 
ser A16B16). 


Pausa (n = 1-64). Se utiliza para simular los “si- 
lencios””. La duración se calcula del mismo modo 
que para Ln. 


Punto. Realiza la operación del ““puntillo” (la du- 
ración de la nota precedente se multiplica por 
3/2). Puede aplicarse también a la pausa (Rn). 


Ejemplo: G2. = GGG (duración de G = 2 x 3/2 
= 6/2 = 3). 


Tiempo: velocidad de ejecución (n = 32 — 255) 
Si no se indica, se entenderá T120. 


Volúmen: volúmen de salida (n= O — 15) 


Modulación: período de la envolvente (n= O — 
65.535). 


Forma: forma de la envolvente (n= O— 15): 


Forma de la 
envol 


4,5, 6,7, 15 


X <variable>: Ejecuta el String especificado. 


En todos estos comandos, el argumento n puede ser constante, 
como por ejemplo 17, ó variable. En tal caso, lo escribiremos de 
la forma: ” = < variable >; ”, donde variable es el nombre de una 
variable (X por ejemplo). 


Ejemplo: Este programa, nos pedirá que le entremos el va- 
lor del período de la envolvente y nos ejecutará 
una pequeña melodía con las distintas formas de 
envolvente (ver Tabla 11). 


10 INPUT “PERIODO:”; B 

20 A$= T23003EG+B04C+DCH03BG+f"" 
30 FORA=3T015 

40 PLAY “M=B;": PLAY “S=A;"” 

50 PLAY AS 

60 NEXT 


ANEXO 3: INFORMACION TECNICA 
1. MAPA DE MEMORIA 


El Mapa de memoria de un ordenador MSX está estructurado en cuatro 
bloques de 64K, denomindos SLOTS “primarios”.con lo que se dispone de 
un espacio físico en memoria de 256K. 


Cada uno de estos SLOTS puede ampliarse hasta un máximo de cuatro 
(SLOTS secundarios). disponiendo así de un espacio en memoria de 1 
Megabyte. (espacio fisico total). 


SLOTY SLOT 1 SLOT 2 SLOT3 


| 
INS ANA dE LN 


OL ] Dodo 


El microprocesador Z80, tiene 16 bits de direccionamiento (BUS de direc- 
ciones), por lo que directamente sólo puede acceder a 64K. (21% =65.536= 
64K) Para permitir el acceso a todo el espacio de memoria disponible, cada 
SLOT se divide en cuatro páginas lógicas de 16K, y mediante el registro 
selector de SLOT (PORT A del Cl-8255). se transforma el espacio físico de 


memoria en un bloque lógico de 64K formado por páginas de 16K de los 
distintos SLOTS. De esta forma, la memoria física está siempre situada en el 
espacio de direccionamiento de la CPU. 


SLOT 


PAGINA O 
PAGINA 1 


PAGINA 2 
PAGINA 3 


0000 


16K 
4000 


8000 
Cco00 


FFFF 


La ROM del BASIC MSX (BIOS + Interprete BASIC MSX), ocupa las páginas 
O y 1 del SLOT O, por lo que la máxima memoria RAM direccionable, 
trabajando en BASIC, es de 32KBytes. De estas 32KB, el sistema se reserva 4K 
para almacenamiento de variables y direccionamiento de los dispositivos de 
Entrada/Salida, quedando disponibles para el usuario 28,.9KB. 


El BASIC MSX, utiliza la mayor área de RAM contigua disponible, instalada 
entre las páginas 2 y 3, por lo que si disponemos de un SLOT con una página 
de RAM y otro con dos (direccionables en BASIC), automáticamente, al 
inicializarse el Sistema, éste seleccionará como memoria RAM detrabajo la 
situada en las dos páginas contiguas, quedando la del otro SLOT inutili- 
zada. 


La selección de SLOTS para cada página, está determinada por el conte- 
nido del registro selector de SLOT (PORT A del Cl-8255). 


MSB Pl bs [x]x ]use 


de pd Página 0, SLOT XX 
e Página 1, SLOT YY 
e Página 2, SLOT ZZ 


e Página 3, SLOT KK 


Con el valor de este registro, podemos hacer un esquema del Mapa de 
memoría en cada configuración 


1% HIT BITSS 

e Registro selector de SLOT 
[vo [ o [o [o] 
PAG.3 PAG.2 PAG.1 PAG.O 

SLOTO SLOT 1 SLOT 2 SLOT 3 

PAG,0 

PAG. 1 

PAG. 2 

PAG. 3 


2%) HIT BIT 55 + HBM 16 (conector posterior HIT BIT) 


e Registro selector de SLOT: 


[0 | 1“ [o [o] 
PAG.3 PAG.2 PAG.1 PAG.O 
SLOTO SLOT 1 SLOT 2 SLOT 3 
PAG.0 
PAG. 1 
PAG. 2 *| RAM 


3%) HIT BIT 55 + HBM 16 (conector superior) 


e Registro selector de SLOT: 


PAG.3 PAG.2 PAG.1 PAG.O 
SLOTO SLOT 1 SsLoT2 SLOT 3 


PAG.O * 
Er] pe. 


4?) HIT BIT 55 + HBM 64 (conector posterior) 


e Registro selector de SLOT: 


IG IC AI 
PAG.3 PAG.2 PAG.1 PAG.O 
SLOTO SLOT 1 SLOT 2 SLOT 3 
PAG.O 
PAG. 1 
PAG. 2 *| RAM 
PAG. «ran 


5) HIT BIT 55 + HBM 64 (conector superior) 
e Registro selector de SLOT: 

PAG.3PAG.2 PAG.1 PAG.O 
SLOT 1 SLOT2 SLOT 3 


PAG.0 


PAG. 1 
PAG. 2 


PAG.3 


6% HITBIT75 


e Registro selector de SLOT: 


GT 7 
PAG.3 PAG.2 PAG.1 PAG.O 
SLOTO SLOT 1 SLOT 2 SLOT 3 
PAG.O RAM 
Pro. 
rro:a ad 
PAG. 3 * EN 


70) HIT BIT 10P 


e Registro selector de SLOT 


[Tu ] 0 [oo] 
PAG.3 PAG.2 PAG.1 PAG,O 
SLOTO SLOT 1 SLOT 2 SLOT3 
PAG. O * | BASIC RAM 
PAG. 1 *| MSX RAM 
PAG, 2 *| RAM 
PAG. 3 »| RAM 
80) HIT BIT 20P 


e Registro selector de SLOT: 


o 
(o) 


PAG.3 PAG.2 PAG.1 PAG.O 


SLOTO SLOT 1 SsLOoT2 SLOT 3 


PAG.O * | BASIC RAM 
PAG. 1 *| MSX | ñam | 
PAG. 2 *| RAM 
PAG. 3 * ñam] 


MAPA DE MEMORIA 
l, Disposición general trabajando en BASIC-MSX: 


210000 MSX BASIC 

ROM 32 K 
H 8000 er 
HC 000 

Usuario , 
HF 380 16 K 
[acacia || 22 

HFFFF 


11, Area disponible por el usuario: 


Area de 
Programa 


Libre 


H 8000 
(HC 000) 


Con 64 K RAM — 28,8 K 
Con 16 K RAM—12,8 K 


H37F 


CONFIGURACION DEL AREA DE USUARIO 


Trabajando en BASIC, la RAM de usuario tiene la siguiente estructura: 


8000 
(CO00) 


AREADE 
PROGRAMA 


e Almacena programas BASIC. 


AREADE 
VARIABLES 


e Almacena datos numéricos aislados 
a variables y punteros de los datos 
alfanuméricos. 


AREADE 
VARIABLES 
DE MATRIZ 


e Almacena datos numéricos 
asignados a variables de matriz y 
punteros de los datos 
alfanuméricos. 


e Zona de memoria libre disponible. El 
tamaño de esta zona puede 
conocerse utilizando la 
función FRE. 


AREADE 
STACK 


e Almacena las direcciones de retorno 
para los comandos de bifurcación. 
(FOR NEXT, GOSUB...) 


e Almacena “strings” (cadenas de 
caracteres) asignados a variables 
alfanuméricas. El tamaño de esta 
zona, puede ser definido por el 
usuario mediante el comando 
CLEAR. Inicialmente, se reservan 
200 Bytes para esta área. 


AREADE 
VARIABLES 
ALFANUMERICAS 


BLOQUE DE 
CONTROL DE 
FICHEROS 


e Utilizado por los Ficheros de 
Entrada/Salida. El tamaño de este 
bloque, corresponde al número de 
Ficheros especificados en el 
comando MAXFILES. 


F37F 


TIEPFHEAFEAFAADAS 


EE 


( 


OBSERVACIONES 


e Normalmente, los SLOTS 0 y 2 son internos al sistema: 
— SLOT 0, Página O y Página 1: BASIC MSX 
— SLOTO, Página2 : PERSONAL DATA BANK 


e La dirección de memoria FFFF de los SLOTS «prima- 
rios» contiene la situación del Registro de selección de 
SLOT «secundario». El valor real de este Registro es el 
complemento de su valor actual. 


e El símbolo **”, indica las páginas direccionadas en BA- 
SIC, que corresponden a las indicadas en el Registro 
selector de SLOT, 


e Todos los ordenadores MSX disponen de 16K de memo- 
ria RAM de Video (VRAM), que se utiliza exclusivamente 
para la visualización en pantalla, por lo que no se inclu- 
yen en el Mapa de Memoria. 


e EL Sistema Operativo de Disco, MSX.DOS requiere 64K 
de memoria de RAM. 


MAPA DE ENTRADA/SALIDA 


DIRECCION 


FF 


Area reservada 


OBSERVACIONES 


Dirección |L/E| Aplicación 


80 L | Lectura Datos 
E0 
INTERFACE 
D8 AS 2320 
Controlador 
Lector diskettes 
DO 
Area Reservada Salida IMPRESORA 
(81) 
BO 
Interface Sis 
Programable 98 L | Lectura datos en 
(PPI) Ram de video 
Ent. datos en Ram PROCESADOR 
A8 - de video DE 
Procesador VIDEO 
de 9928 
Establecimiento 
Mandatos/Direcc. 
AD AO | E | Mantenimiento de 
Procesador Dirección PROCESADOR 
DE 
A1 E | Ent datos SONIDO 
AY-3-8910 
Lectura datos 
98 
Impresora AB Lectura datos 
PortA 
90 
Area Reservada 
88 PPI 
8255 


RS 2320 


80 
Area Reservada 


00 


Ent. datos Port C 


Est. Modo trabajo 


L = LECTURA 
E=ESCRITURA 


PORT | BIT | E/S| SEÑAL 


APLICACION 


a A 0 Ss |CsoL Selección de Slot en 
1 S |CSOH Página 0 

a 

a 2 Ss |csiL Selección de Slot en 
3 | s [csi  |Página1 

« 4 Ss |Cs2L Selección de Slot en 
5 S |CS2H Página 2 
6 S |CS3L Selección de Slot en 

E 7 | s [csgH  |Página3 


Página 0: 0000 - 3FFF 
Página 1: 4000 - 7FFF 
Página 2: 8000 - BFFF 
Página 3: C000 - FFFF 
E = Entrada 

S = Salida 


Salida de sonido (cuando 
está controlado por Soft) 


Teclado 


Teclado 


l 


DISTRIBUCION DE LOS PORTS DE E/S DEL PROCESADOR DE SONIDO 


APLICACION 


4S1-PIN 1 
4S2-PIN1 "2 


OBSERVACIONES 


Adelante 


3 E |JS1-PIN4 “1 
JS2-PIN4  ”: 


1 E |JS1-PIN2 *1 Atrás 
JS2-PIN2 “2 
2 E |JS1-PIN3 *1 Izquierda 
JS2-PIN3 “2 
Derecha 


4 E [JS1-PING “1 
4S2-PING * 


4S1-PIN7 
JS2-PIN7 "2 


Botón de disparo 1 


Botón de disparo 2 


6 E [Selección caracteres 


Solo versión Japonesa 


4S1 - JOYSTICK 1 
4S2 - JOYSTICK 2 
E  -ENTRADA 
S  -SALIDA 


del teclado 
7 | E [csar Lectura cassette 
B | o |susi-PIn6 -3 
1 | s Jusi-PIN7 03 
2 | s jus2-PIN6 “3 
3 JS2-PIN7 
4 JS1-PINT 
Ps | 
Pe] Selección JS1/JS2 
7 Sólo versión japonesa 


*1 - ACTIVADO CUANDO EL BIT 6 DELPORTBES"0' 
*2 - ACTIVADO CUANDO EL BIT 6 DEL PORT BES "1 


“3 -SIELPORT BNO SE UTILIZA PARA SALIDA, ESTE BIT DEBE SER “1 


| 


DITA DANA AS 


( 


( 


( 


2. PROCESADOR DE VIDEO (VDP) 


El ordenador incorpora el circuito integrado TMS 9928 A que actúa como 
procesador de imágen de video. Paralelamente va incorporada una memo- 
ria adicional de memoria RAM de 16 K, donde se almacena la información 
de las posiciones en la pantalla, junto con la definición de cada carácter, 


En cada tipo de pantalla la información queda almacenada en distintas 
partes de la memoria. Mediante las funciones “VPEEK" y "VPOKE" pode- 
mos examinar y alterar dichas posiciones. 


La función BASE(N) se utiliza para leer o escribir una dirección base de la 
tabla del procesador de visualización (VDP). El contenido de los registros y 
la dirección base de la tabla del TMS 9928 A, que es el contenido de la 
pantalla, podrá modificarse directamente utilizando una variable BASE y 
una variable VDP. Es necesario conocer adecuadamente el TMS 9928 A ya 
que podría alterar la visualización normal de la pantalla. 


A continuación se detallan los valores posibles de la función BASE según el 
tipo de pantalla utilizada. 


Valor de N Tabla 
ja 0 Tabla de nombres de patrones del modo de texto 
de 40 caracteres x 24 líneas, 
2 Tabla del generador de patrones del modo de texto 
de 40 caracteres x 24 lineas. 
5 Tabla de nombres de patrones del modo de texto 
de 32 caracteres x 24 líneas. 
6 Tabla de colores del modo de texto de 
32 caracteres x 24 lineas. 
EN Tabla del generador de patrones del modo de texto 
de 32 x 24 caracteres. 
8 Tabla de atributos de figuras móviles del modo de 
texto de 32 x 24 caracteres. 
9 Tabla de patrones de figura móvil del modo de 
texto de 32 x 24 caracteres. 
10 Tabla de nombres de patrones del modo de 
gráficos de gran definición. 
1 Tabla de colores del modo de gráficos de gran 
definición. 
12 Tabla del generador de patrones del modo de 
gráficos de gran definición. 
13 Tabla de atributos de figuras móviles del modo de 
gráficos de gran definición. 
14 Tabla de patrones de figura móvil del modo de 
gráficos de gran definición. 
15 Tabla de nombres de patrones del modo multicolor. 
17 Tabla del generador de patrones del modo 
multicolor. 
18 Tabla de atributos de figuras móviles del modo 
multicolor, 
19 Tabla de patrones de figura móvil del modo 
multicolor, 


N = 1,3, 4, y 16 no se utilizan 


En cada tipo de pantalla (SCREEN) se manejan una serie de tablas cuyos 
detalles se especifican a continuación. 


SCREEN O 


SCREEN 0 sólo puede contener caracteres (Máximo: 40 x 24); un color de 
pantalla; no es posible utilizar SPRITES y el color de los bordes es el de 
fondo. 


La pantalla queda dividida en 40 líneas verticales y 24 lineas horizontales, 
por lo que disponemos de 960 posiciones. 


Existen dos tablas para el manejo y almacenamiento de los caracteres, La 
tabla NOMBRE contiene el código de carácter de cada posición de pantalla. 
La tabla PATRON contiene el diseño de los diferentes caracteres. Cada 
posición de la tabla NOMBRE tiene reservados 8 octetos de la tabla PATRON. 


El inicio de la tabla NOMBRE viene dado por la variable BASE (0) y el de la 
tabla PATRON por BASE (2). 


Imaginemos que en la primera línea de la pantalla tenemos la palabra 
SONY: 


PANTALLA TABLA NOMBRE TABLA PATRON 


La primera posición de la pantalla es la letra S cuyo código ASCII (83) está 
reflejado en la primera posición de la tabla NOMBRE. Este mismo código 
(83), multiplicado por ocho, da la primera posición de la tabla PATRON, 
donde se encuentra reflejada la forma de este carácter. La estructura de 
este carácter se encuentra en las 8 posiciones consecutivas de la tabla 
PATRON (664-671). 


EJEMPLO 


Si ejecuta el siguiente ejemplo podrá comprobar el contenido de la tabla 
PATRON: 


SCREEN 1 


En SCREEN 1 cada 8 caracteres pueden presentarse en diferente color; 
puede manejar SPRITES: el máximo número de caracteres es de 32 x 24. 


La pantalla queda dividida en 32 líneas verticales y 24 horizontales, por lo 
que disponemos de 768 posiciones. 


En este caso se manejan tres tablas en la memoria RAM de video. La tabla 
NOMBRE y PATRON funcionan de forma similar a la descrita en SCREEN O. 
La tercera tabla, tabla COLOR, es la correspondiente al color de cada 
carácter y de su fondo de la tabla NOMBRE. 


El inicio de la tabla NOMBRE viene determinado por la variable BASE (5), la 
tabla PATRON por BASE (7) y la de color por BASE (6). 


PANTALLA TABLA NOMBRE TABLA PATRON 


Los colores de fondo y de los caracteres se pueden modificar independien- 
temente con la sentencia COLOR. Además pueden presentarse diferentes 
colores a la vez. 


BASE (6) indica el principio de la tabla COLOR de 32 bytes. Cada byte está 
dividido en dos cuartetos. El primer cuarteto indica el color de los ocho 
primeros caracteres consecutivos de la pantalla y el segundo cuarteto el 
color de fondo. 


SCREEN 2 


En SCREEN 2 pueden presentarse gráficos de alta resolución y SPRITES; 
texto en pantalla gráfica; 256 x 192 puntos de resolución y cada 8 puntos 
tiene su propio color de frente y fondo. 

La pantalla queda dividida en 24 lineas horizontales y 32 verticales confi- 
gurando un total de 768 posiciones de pantalla. Cada posición está subdivi- 
dida en una malla de 8x8 puntos. 


Se conserva el número de tablas, aunque varía su longitud. La tabla NOM- 
BRE contiene el código de carácter de cada posición correlativa de la 
pantalla. 


El código de carácter que figura en la tabla NOMBRE señala la posición del 
tipo y color del carácter en la tabla PATRON y tabla COLOR, respectiva- 
mente. 


Cada carácter de la tabla NOMBRE está constituido por una matriz de 8 x 8 
puntos en la tabla PATRON. Por lo tanto la tabla PATRON estará compuesta 
de 768 posiciones de 8 bytes, resultando 6144 bytes. 


Para cada posición de la tabla PATRON existe el color correspondiente del 
caracter y de su fondo en la tabla COLOR. 


PANTALLA TABLA NOMBRE TABLA PATRON 
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El inicio de la tabla NOMBRE viene determinado por la variable BASE (10), la 
tabla PATRON por BASE (12) y la tabla COLOR por BASE (11). 
SCREEN 3 


En SCREEN 3 pueden presentarse gráficos de baja resolución y texto en 
pantalla gráfica en modo multicolor. 


Este modo proporciona una definición de 64 x 48 bloques de color. Cada 
bloque contiene 4 x 4 puntos. El color de cada uno de los cuatro puntos 


= 
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puede ser uno de los 16 colores existentes. Consecuentemente, todos los 
colores pueden ser usados simultáneamente en el modo SCREEN 3. Los 
planos SPRITES están permitidos en este modo. 


En este tipo de pantalla existen dos tablas La tabla NOMBRE es la misma 
que para SCREEN 2, consistiendo en 768 posiciones. El color está ahora 
definido en la tabla PATRON. El código de carácter de la tabla NOMBRE 
señala un segmento de 8 bytes de VRAM en la tabla PATRON, 


Sólo 2 bytes de los 8 que forman el segmento son usados para especificar la 
imagen de pantalla. Estos 2 bytes especifican 4 colores y cada color ocupa 
Un área de 4 x 4 puntos. Los cuatro primeros bits (MSB) del primer byte 
definen el color del bloque izquierdo superior del patrón multicolor; los 4 
bits restantes definen el color del bloque superior derecho, El segundo 
bytes define, de forma parecida, el'bloque inferior izquierdo y derecho del 
patrón multicolor. Los 2 bytes crean un mapa de 8 x 8 puntos de patrón 
multicolor. 


PATRON MULTICOLOR 
k— B8puntos —».| 
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colorC ¡ colorD 


2 Bytes de la Tabla 
Generador de Patrón 


La posición de los 2 bytes dentro del segmento de 8 bytes señalado por el 
código de carácter de la tabla NOMBRE depende de la posición que apa- 
rece el carácter en la pantalla. Para nombres en la fila superior (fila 0), los 2 
bytes son los 2 primeros dentro de los grupos de segmentos de 8 bytes 
señalados por el código de carácter de la tabla NOMBRE. La siguiente fila 
de caracteres (fila 1) utiliza los bytes 3 y 4 de los segmentos de 8 bytes. La 
siguiente fila utiliza los bytes 5 y 6 mientras que la última fila utiliza los bytes 
7 y 8. Esta serie se repite para el resto de pantalla. 
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Cuando se utiliza este modo, 768 bytes son utilizados por la tabla NOMBRE 
y 1536 bytes son usados para la información de color en la tabla PATRON 
(24 filas x 32 columnas x 8 bytes/posición patrón). 


3. CONECTORES 
1. CASSETTE: 


CONECTOR 


MASA 
MASA 
MASA 


SALIDA 
ENTRADA 
REMOTO + 
REMOTO — 
MASA 


E = ENTRADA 
S = SALIDA 


2. AUDIO/VIDEO 


PIN SEÑAL E/S CONECTOR 
1 + 12V = 

2 MASA == 

3 + 12V - 

4 VIDEO Ss 

5 AUDIO Ss 

6 AUDIO s a 

3. JOYSTICK 


PIN SEÑAL [es |] CONECTOR 
H—————— 


ADELANTE 
0.0.0.0 
0000 


ATRAS 
IZQUIERDA 
DERECHA 
+5V. 

B. DISPARO 1 
B. DISPARO 2 
SALIDA 


MASA 
E 1 Es 


4. IMPRESORA: 


Llmmmm 


m 
dd 
mn 


VCOJDRALN= 


lun 


CONECTOR 


DATO6 
DATO7 

SIN CONEX. 
BUSY 

SIN CONEX. 
SIN CONEX. 
MASA 


5. CARTUCHO: 


Pin 49 


mn A 
PIN SEÑAL E/S SEÑAL E/S 
1| Cs1 Ss Cs2 Ss 
3 | CSs12 s SLTSL s 
5 | Reservado = RFSH Ss 
7 | WAIT El INT E 
9| M1 Ss BUSDIR E 
11 | ¡ORO Ss MERQ s 
13 | WR s RD s 
15 | RESET s Reservado 2 
17 | A9 Ss A1S s 
19 | At1 s A10 s 
21 | A7 s A6 Ss 
23 | A12 Ss A8 s 
25 | A14 s A13 s 
27 | A1 s AO s 
29 | A3 s A2 s 
31 | A5 s A4 Ss 
33 | D1 E/S DO E/S 
35 | D3 E/S D2 E/S 
137 | D5 E/S D4 E/S 
99 | D7 E/S D6 E/S 
41 | Masa = Reloj s 
43 | Masa = sw1 = 
45 | +5V —_ Ssw2 = 
47 | +5V - +12V iS 
49 | SOUNDIN E DN — 


E] 


rr E 


f 


¿— 
PIN ll Estada CONTENIDO 
1 Cs1 Señal de selección de direcciones ROM 4000/7FFF' 
2 Cs2 Senal de selección de direcciones ROM 8000/BFFF| 
3 cs12 Señal de selección de direcciones ROM 4000/BFFF 
S (para 256 K ROM) 
4 SLTSL Señal de selección de SLOT 
5 Reservado — | Linea de señal reservada (uso inhibido) 
6 RFSH Ciclo de señal de refresco 
7 WAIT Señal de requerimiento de espera de la CPU 
8 INT Señal de requerimiento de interrupción de la CPU 
El M1 Señal de ciclo de fetch de CPU 
10 BUSDIR Esta señal controla de dirección de buffer del bus 
de datos externos. Los cartuchos son 
seleccionados y el niel “L” es sacado de cada 
cartucho en el momento de transmisión de datos. 
“ 1ORQ Señal de requerimiento E/S 
12 MERO Señal de requerimiento de memoria. 
13 WR Señal tiempo escritura 
14 RD Señal de tiempo de lectura 
15 RESET Señal de RESET del sistema. 
16 RESERVADO] Linea de señal reservada (uso inhibido) 
17 32 |AOA15 Señales del bus de direcciones. 
33 40 [DOD7 Señales del bus de datos. 
141 MASA Señal de Masa. 
142 RELOJ Reloj CPU 3.58 MHZ. 
143 MASA Señal de Masa. 
144, 46|SW1.SW2 — |Para protección de Inserción/Ordenación 
45, 47|+5V Tensión + 5V. 
48 +12V Tensión + 12 
49 SOUNDIN Senal de entrada de sonido (- 5 dbm). 
50 -12V Tensión 12 V. 
6. RGB: 
PIN E SENAL | PIN SEÑAL CONECTOR 
1 SAL. AUDIO D 1 
A?2 ENT. AUDIO D 13 | MASA 
3 SAL. AUDIO | 14 
4 | MASA 15 -CoLoRmoVO! 
5 MASA 16 BLANKII 
A6 ENT. AUDIO | 17 MASA 
7 18 MASA 
8 19 SAL. VIDEO 
9 20 0 
10 21 = 
11 | cotonvenoe,, 
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ANEXO 4: PROGRAMAS 


PROGRAMA DEMOSTRACION DE LOS COMANDOS GRAFICOS 
UTILIZADOS EN EL BASIC MSX 


1 REM Xx COMANDOS GRAFICOS Xx 

18 COLOR 15,1,1 

15 **XX*x ALTA RESOLUCION -->SCREEN 2 
20 SCREEN 2 

25 "XXX PUNTO *xxXx* 

29 PSEMES2a2 So 

35 *XXxk LINEA *xXxk 

48 LINE(26,32)-(116,32),8 

45 "XAX RECTANGULO Xxx 

50 LINE(135,12)-(180,52),12,B 

55 '***X PINTAR UN RECTANGULO Xxx 
60 LINEC204,12)-(244,52),8,BF 

65 "*X*kxk CIRCULO *Xxk 

20 CIRCLE(32,96),28,5 

25 "XXX PINTAR UN CIRCULO XXX 

88 CIRCLE(96,96),20,4 

90 PAINT(96,96),4 

95 "XX ELIPSE HORIZONTAL XxX 
198 CIRCLE(160,96),2B,15,,..5 
105 "AXKPINTAR UNA ELIPSE HORTZONTALxRkxk 
110 CIRCLECZZA, BT 20 LS 
1208 PAINTC224,96),13 

125 "XXX ELIPSE VERTICAL *XxXx 

139 CIRCLE(32,160),28,2,,,2 


135 *Xx*k PINTAR UNA ELIPSE VERTICAL XxX%* 
148 CIRCLE(36,168),2B8,11,,,2 

159 PAINT(36,1683,11 

155 "XXX MACRO LENGUAJE GRAFICO XxX 

168 DRAV"c2bm140,160 riBe20fSr1Be10fSe1D 
rSeSf108rsf10" 

178 'GOTO 128 


PROGRAMA DE GRAFICOS: SIMULACION REBOTES 
DEUNA PELOTA 


10 '"**XREBOTES DE UNA PELOTAXx 

20 SCREEN 2,B:COLOR 15,1,1 

30 CLS:A=RND(-TIME):T=INTCRNDC1)k14+2):0 
PEN"GRP:"FOR OUTPUT AS41:PRESET(78,19):C 
OLOR T:PRINTH1, "REBOTES DE UNA PELOTA" 
40 X=10:Y=10:0=4:U=D8:C=D 

30 CIRCLE VINSOEs, 1.2 

68 ON INTERUAL=S GOSUB 198 

20 INTERUAL ON 

80 IF X<256 THEN 88 

390 INTERUAL OFF:CLOSE:GOTO 38 
IOBAGIRCLELA, VI TAL Z 

119 U=U+A 

128 X=X+5:Y=Y+U 

138 IF Y>180 THEN Y=188k2-Y:U=-UX. 8:BEEP 


140 CIRCLECX, 49,5, T 
150 RETURN 


PROGRAMA DE GRAFICOS: CUADROS ABSTRACTOS 


18 REM Xx*x* CUADROS ABSTRACTOS xxx 
20 SCREEN 2:COLOR 15,1,1:CLS 

22 A=RNDC-TIME) 

25 FOR I=1 TO 75 


| 


CELETETPEETES E 


( 


( 


ex 


272 C=INTCRNDC1)*19)+2 

30 X1=INT(RND(1)x255) 

48 Y NTCRNDC1)x192) 

50 *X2=INT(RNDC(1)X255) 

560 Y2=INTCRNDC1)*192) 

20 LINECX1,Y1)-(X2,Y2),C,BF 

80 NEXT 

90 FOR I=1 TO 2B00:NEXT:GOTO 28 


PROGRAMA DE GRAFICOS: CIRCULOS DE COLORES 


108 COLOR 15,1,1 
20 SCREENZ:A=RNDC-TIME) 
30 FOR X=8 TO 2x3.14159 STEP . 1847196664 


40 CIRCLE(124+4B8XC0SCX), 186+4BXSINCXII, 2 
0, INTERNDC1IX15)+1,,,1 

50 NEXT 

60 GOTO 68 


PROGRAMA DE GRAFICOS: FLORES 


19 "XxX GRAFICOS ALEATORIOS Xx 

20 COLOR 15,1,1:SCREEN 2:0=RND(-TIME): 
30 R1=5:R2=2B:2=3.14-180 

40 X0=INTC256XRNDC1)):Y8=INTC19ZXRNDC1)) 
¿C=INTC194XRNDC1))+2 

50 FOR T=B TO 368 STEP 28 

60 S=TxX2Z 

28 Y=SIN(S):X=C0S(S) 

80 LINECRIXX+X0, RIXY+YD)-(R2ZXX+X0, R2ZkXY+Y 
Ba E 

90 NEXT T 

188 GOTO 48 


PROGRAMA DE GRAFICOS: DIBUJO DE CIRCULOS DE COLORES 
ALEATORIOS EN FORMA SENOIDAL 


S *"*XX*x GRAFICOS ALEATORIOS Xxkx 

30 COLOR 157,4 

20 SCREEN2:C=2:A=RND(—-TIME) 

30 FOR X=9 TO 6.28 STEP. 152 

40 COLOR C:C=C+1:21F C=16 THEN C=2 

50 Y=SINCX)480+396:A=1NTC(RND(1)x96) 

69M 2=COS(xX+(3.1415-2))x80+96 

29 CIRCLE(X*x39+20,Y),12,,,,.S:PLAY"N=A;" 


80 CIRCLE(X*39+28,2),12,....5 
390 NEXT 
199 GOTO 39 


PROGRAMA DE GRAFICOS: 'ESTRELLAS' 


19 REM $ GRAFICOS:PSET $ 

20 REM *CIELO ESTRELLADO” 

38 A=RNDC(-TIMEJ:COLOR 15,1,1:SCREEN 2, 
FOR 1=8 TO 288 

40 X=INTCRNDC1)K255)+1 

Sa Y=INTCRNDC1)Ix192)+1 

69 PSETCX,Y), INTCRNDC1)IX14)+2 

28 NEXT 1 

80 FOR I=1 TO 2088 :NEXT 1 

390 SPRITES(0)=CHR$(8B0090B000)+CHR$CSBDA 
009080)+CHR$(2B00100100)+CHR$(£BB01111B0 
J+CHR$(8881811810)+CHR$(881091 1001 )+CHR$ 
(8801111110)+CHR$(£B20190190) 

109 PUT SPRITE 68,(120,90) 

110 FOR Q=1 TO 200:X=INT(RNDC1)kX20)X(-1) 
*Y ¿Y=INTCRNDC1IA2B)X(-1)%% 

120 PUT SPRITE 0,STEPCX,Y),S5:BEEP 

130 FOR T=1 TO 7B8:NEXT 

140 NEXT Q:FOR I=1 TO 2800 :NEXT :CLS:GOTO 
30 


| 
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PROGRAMA DEMOSTRACION DE GRAFICOS. 1. 


10 REM XX*x*x GRAFICOS XXkxk 
z0 ' INICIALIZACION 

30 XC=128:YC=96 

40 R=8 

su sP=6 

68 RATIO=1.5 


.14159:FLAG=1 
:YB=D:XE=D:YE=0D:XM=D:YM=BD 
x(61.Y161.0ar61 

128 A(2)-8:3111=-15:6.21-9:A0(3)=-15:AL4) 
=0:4(5S)=-15 

130 FOR NO=08 TO 5 

148 ACNOJ=ACNO)-180XP1I 

150 NEXT NO 

168 C=2 

120 * PROGRAMA PRINCIPAL 

188 SCREEN 2:COLOR 2,1,1:CLS 

198 UW=8:FOR ANGLE=B TO 368 STEP SP 


200 U W+1 :C=5 
210 Al NGLE+18BX*P1 
220 RB=R 


238 FOR NO=8 TO 5 
248 X(NO)=RBXRAT IOXCOSCAG+ACND) IXRX 

258 Y(NO)=RBXRAT IOXSINCAG+ACNO) JXRY 

260 RB=RBXRATIO 

270 NEXT NO 

289 FOR NO=8 TO 4 

298 LINECXCNOI+XC, YONOI+YCI-CXCNO+1I+XC, 
Y(NO+1)+YC),C 

300 NEXT NO 

318 IF XB<B AND FLAG=-1 THEN LINECXB+XC 
,YB+YCI-CXCBI+XC, Y(BIFYCI,C 

328 1F XEX>M AND FLAG=-1 THEN LINECXE+XC 
EH YCI-(XOSIAXC, Y(SI+YC),C 

338 1F XMOB AND FLAG=-1 THEN PAINTCCXM+ 
XC4IFXCK2)/2, (YM+Y (4 )+Y0K2)/2),0 

340 XB=X(8):YB=Y(8) 

350 XE 3 
369 XM=X(4):YM=Y(4) 


378 FLAG=-FLAG 

38D IF Uw=1 THEN 390 ELSE VuU=BD 

390 NEXT ANGLE 

400 FOR I=1 TO 509B:NEXT I:CLEAR:CLS:GOT 


PROGRAMA DEMOSTRACION DE GRAFICOS. 2. 


10 REM XX*XX GRAFICOS AXXAX 

20 * INICIALIZACION 

30 DIM R(9),S(9) 

40 xS=3 

50 XF=2 

68 Yu=59 

20 RC(1)=48:R(2)=108:R(3)I=5:R(9)=S:ROSI=51 
R(6)=5S:R(7)=10:R(8)=48:R(BI=D:SC(BI=B 

88 FOR NO=1 TO 8 

398 S(NO)=SCNO-1)+RCNO) 

100 NEXT NO 

110 PI=3.14159 

128 "PROGRAMA PRINCIPAL 

139 SCREEN Z2:COLOR 8,1,1:CLS 

140 FOR X=36 TO 222 STEP x*S 

158 Y=YWKSINCXF*XX1180XP 1) 

169 FOR NO=1 TO 2 STEP 2 

178 CIRCLECX-RUNOIXCOSCP 1/4), (S(NO-13X2+ 
RUNOJIASINCP114)+Y),RONO), ,PIX214,P1449 
188 CIRCLE(X+RC(NO+1)IXCOSCPI+4), (S(NOIXZ+ 
RUNO+1)IXSINCP1I49)+Y),RONO+1), ,PIX314,PI 
x5/4 

198 NEXT NO 

200 NEXT *X 

210 FOR I=1 TO SOBO:NEXT 1:CLEAR:CLS:GOT 
o 28 


PROGRAMA DE GRAFICOS: 'SPRITES' 
MOVIMIENTO DEL CAÑON —. CURSORES 
DISPAROS -. BARRA DE ESPACIO 


S SCREEN 1,8:KEY OFF :COLORI1S,4,4:A=RND(= 
TIME) 

20 FOR 1=0 TO 2 

38 GOSUB 3810 

40 SPRITESCII)=SPS 

50 NEXT 1 

20 ON STRIG GOSUB 1919:STRIGCBION 
809 ON SPRITE GOSUB 2019 

390 *X0=0:YB8=30:X1=128:Y1=179 

108 PUT SPRITE 1.041,11, 1531 

128 ON (STICK(O)+21-4 GOSUB 2BB,3B0 
130 X9=X0+INTCURNDC1)x5+1) 

140 YO=Y0+INTCRNDC1)X11-5) 

150 PUT SPRITE B,(X8,Y0),15,8 

169 GOTO 198 

200 X1=X1+2:RETURN 

300 X1=X1-2:RETURN 

1818 SOUND 6,15:SOUND 2,2 

1828 SOUND 8,16:SOUND 9,16 

1038 SOUND 18,16:SOUND 11,8 

1949 SOUND 12,18:SOUND 13,1 

10509 STRIG(8) ON:SPRITE ON 

1969 X2=X1 

1078 FOR Y2=Y1-8 TO -8 STEP -1 
1989 PUT SPRITEZ, (X2,Y2),15,2 
1898 NEXT Y2 

1108 RETURN 

2018 SOUND M,65:SOUND 1,15 

2020 SOUND 2,97:SOUND 3,15 

20390 SOUND 4,162:SOUND S,15 

2048 SOUND 6,15:SOUND 2,21 

2058 SOUND 8,31:SOUND 9,31 

2069 SOUND 19,31:SOUND 11,228 
2078 SOUND 12,32:SOUND 13,1 

2089 PUT SPRITEGO, (XB,Y0),8,9 

2098 LOCATE 18,12:PRINT"GAME OUER” 


2108 FOR I=1 TO 1009:NEXT :RESTORE :SPRITE 
OFF :CLEAR:GOTO 5 
3019 SP$="" 

3028 FOR J=1 TO 8 
3038 READ Ds 

3049 SPS$=SP$+CHRS(UVAL("LB"+*D$)) 
3058 NEXT J 

3069 RETURN 

4019 DATA 80811908 
4020 DATA 68111190 
4039 DATA 81111119 
4849 DATA 11811911 
4050 DATA 119011911 
4068 DATA 11111111 
1278 DATA 00106100 
4089 DATA 61800019 
4108 DATA BaB10BVa 
4110 DATA 08111009 
41208 DATA 08111988 
4130 DATA aB1111199 
4140 DATA 11111111 
4158 DATA 190191919 
4168 DATA 11111119 
4170 DATA 11908119 
4199 DATA BaB1BBaa 
4208 DATA BaBB1DBaVa 
4219 DATA aBBBaBaBaBVa 
4228 DATA aBaBaaaa 
4239 DATA BUBBABBA 
4248 DATA auLBBaBaa 
4259 DATA BBBBaBaa 
4269 DATA BBBaBBaABA 


( 


MA 


PROGRAMA DE MUSICA: ORGANO MUSICAL 


20 
30 


40 
se 
50 
>8 
ga 


10 REM X*X*xx ORGANO MUSICAL XkkX 
» 


* TECLAS:.QUERTYU --> DO-SICOCTAVA 2) 


. 1 425100 COCTAVA 3) 
. ASDFGHJ --> DO-SICOCTAVA 4) 
«K <> DA COCTAVA 5) 
.ZXCUBNM --> DO-SICOCTAVA 6) 
-. +, CCOMA) --> DO COCTAVA 2) 


SCREEN 2:CLS:COLOR 8,1,1 
OPEN"GRP:"FOR OUTPUT AS +1 
A$="U208R28D28L 29" 

FOR X=20 TO 198 STEP 25 
PRESET(X, 48) :DRAW "CSXAS;" 


NEXT 


PRESETC20,78) :DRAW "CSXAS;" 
FOR X=28 TO 198 STEP 25 
PRESETCX, 100) :DRAUW "CSXAS;" 


NEXT 


PRESETC20, 130) :DRAW"CSXAS;" 
FOR X=20 TO 198 STEP 25 
PRESET(X, 168) :DRAW"CSXAS;" 


NEXT 


PRESET(20, 190) :DRAW"CSXAS 3" 
FOR X=22 TO 198 STEP 25 


READ As 


PRESETCX, 22) :PRINTH1,AS$ 


NEXT 


PRESET(27,52):READ AS:PRINTH1,AS 
FOR X=22 TO 198 STEP 25 


READ As 


A ez _m—_=zEEA4<«á< 00 í VO Ogg 


348 


350, 


369 
370 
389 
390 
409 
419 
420 
430 
448 
458 
468 
470 
488 
490 
500 
519 
520 


PRESET(X,87) :PRINTH+1,A$ 
NEXT 


PRESET(27,117):READ AS:PRINTH1, AS 


FOR X=27 TO 198 STEP 25 
READ As 
PRESETCX, 142) :PRINTH1,AS$ 
NEXT 


PRESETC27,177):READ AS:PRINTH1, AS 


COLOR 14 
FOR X=23 TO 185 STEP 25 
READ As 
PRESETCX,8) :PRINTH1,A$ 
NEXT 


PRESET(2008,8):PRINT41, "OCTAVA" 


COLOR 8 
FOR Y=22 TO 177 STEP 30 


PRESET(218,Y):READ A:PRINT41,A 


NEXT 


PRESET(S58,57):COLOR 2:PRINTH1," ORGA 


NO MUSICAL" 


538 
540 
558 
560 
570 
588 
590 
608 
619 
620 
639 
648 
650 
669 
679 
689 
698 
200 
210 
220 
230 
240 
250 
260 


PRESET(28, 112) :PRINTH41," ¿80 2" 


GOSUB 93808 
PLAY"L15U1S" 


A$= 


0 
EE 
1F 
1 
IF 
IF 
LE 
dE 
EE 
157 
IF 
IF 


INKEYs: 


as="9" 
as="u" 
As="E" 
AS="R" 
as=nTo 
As="y" 
as="U" 
as="1" 
As="A" 
As="S" 
as="D" 
as="F" 
as="G" 
as="H" 
as="" 
ask" 
As="2" 
as="x" 
As="C" 
as="U" 


IF A$="" GOTO 569 


THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 


PLAY"02C" 
PLAY"02D" 
PLAY"O2E" 
PLAY"D2F" 
PLAY"02G" 
PLAY"02A" 
PLAY"02B" 
PLAY"03C" 
PLAY"D4C" 
PLaY"04D" 
PLAY"04E" 
PLAY"04F" 
PLAY"04G" 
PLAY"04A" 
PLAY"04B” 
PLaY"05c" 
PLavy"o06c" 
PLAY"06D" 
PLAY"OBGE" 
PLAY"D6F" 


u 


270 
780 
290 
848 
819 
820 
839 
848 
85a 
860 
870 
88a 
890 
3900 
310 
320 


TE As="8" THEN PLAY"06G" 
IF AS$="N" THEN PLAY"O6GA" 
IF AS="M" THEN PLAY"06B" 


IF As$="," THEN PLAY"027C" 
GOTO 568 

DATA Q,W,E,R,T,Y,U 

DATA 1 

DATA A,S,D,F,G,H,J 

DATA K 

DATA 2,X,C,U,B,N,M 

DATA "," 


DATA DO,RE,MI,FA,SOL,LA, SI 
DATA 1,2,3,4,5,6 
REM XXXXx MÚSICA INICIAL XXkX 


AS="L806C4. ECEG16L64CFALBO7COBBAGGS. 


. OSL64GBOSDL8GFDOSBGBOBDFECAGG4" 


3930 
940 
950 
3968 
3978 


B$="05L8CGEG" 

C$="OSCAFA" 

D: 04GOSFDF" 
F$=B$+BS+C$+B$+D$+D$+B8$+8$ 
T$="L806C4. ECEG16L64CFALBO7COBBAGGS. 


- OSL64GBOSDL8GFDOSBGBOBDOSBOSCOSGOBECC2" 


380 
3999 


G$=BS+B$+C$+B$+D$+D$+B$+8$ 
PLAY"S1M3088T128", "S8MSOBT120" :PLAY 


AS, FS:PLAY T$,G$ 
1088 RETURN 


PROGRAMA DE MUSICA: HIMNO 


18 REM Axkxk PROGRAMA MUSICAL xxkxx 

20 REM HL ELMENDO 

30 COLOR 4,14,14:CLS:GOSUB 18B8:CLEAR:PLA-» 
A a 

49 U1$="T10806L 4CCDOSG. OB6C8DEEFE. DSCESD8 
COSGO6C.D8E8F8GGGG.FSEFFFF . ESDELBFEDCL4E 
- F8GL12AGFL4EDCRAR4 R2O" 

59 U2$="T18805L4EGAD. GBGGAAGBAFEDE . RBR4G 


GGG. 


28" 


G8GGGGG. GBGGLBAGFEL4G. FBGRAGFERARA R 


60 U3$="T108804L 4DEFG. ABBOSCOIAFGGHAFGO3G 
04C03CR404CEGOSCO4CR4O3CBO4DGOBGRADICOSC 
CC. 04ABEF8D8GO3G04C03EC R20" 

28 PLAY Ul$,U2$, U3$ 

88 FOR F=1 TO BBBB:NEXT F 

398 GOTO 78 

108 SCREEN O:PRINT:PRINT:PRINT:PRINT:PRI 
NT:PRINT:PRINT:PRINT 


119 PRINT" A 
120 'PRINT" k 
130 PRINT" HIMNO “ 
140 PRINT” X 
150 PRINT" 222 
160 RETURN 


PROGRAMA DE MUSICA: 'ROCK' 


10 REM XXkkkx MUSICA XXXXXX 
20 REM EFECTOS ESPECIALES 

38 REN Xk ROCK XX 

48 CLS:KEY OFF:CLEAR:COLOR 1,INTCRNDC1IK 
15)+2 

58 LOCATE 14,17:PRINT"R 0 € K" 

60 B=5008:PLAY"U12" 

70 A$="T23003EGHBO4CHDCHO3BGH" 

80 B$="T23003AD4CHEFHGFRECH" 

98 C$="T23003B04DHFHGHAGHFRDA" 

180 FOR A=3 TO 15 

110 IF A=9 OR A=S OR A=6 OR A=7 OR A=15 

THEN 158 

120 PLAY"M=B;":PLAY"S=A;" 

138 FOR I=1 TO 2:PLAY A$:COLOR, INTCRNDC1 
1k14)+2:NEXT 

140 PLAY B$:COLOR, INTURNDC1)X14)+2:PLAY 

A$:COLOR, INTURNDC1)X14)+2:PLAY C$:COLOR, 
INTORNDC1)X14)+2:PLAY B$:COLOR, INTURNDC1 
)x19)+2 

150 NEXT A:GOTO 188 


PROGRAMA PARA HACER UNA COPIA DELA PANTALLA 
(SCREEN 0) POR IMPRESORA 


19 
20 
30 
49 
50 
[512] 
Al 
29 
ga 


REM XXx HARD-COPY ->SCREEN B xxx 


FOR K=8 TO 369 

ASUPEEK(BASE(BI+K) 

LPRINT CHRSCA); 

1F L=39 THEN 88 ELSE IF L<39 THEN L=L 


NEXTK :END 
LPRINT:L=B8:GOTO 2D 


PROGRAMA PARA HACER UNA COPIA DELA PANTALLA 
(SCREEN 1) POR IMPRESORA 


18 
20 
39 


REM XxX HARD-COPY ->SCREEN 1 *Xx**k 


FOR Kk=9 TO 262 

A=UPEEK (BASE (SI+K) 

LPRINT CHR$S(A)J3 

IF L=31 THEN 89 ELSE IF L<31 THEN L=L 


NEXTK :END 
LPRINT:L=B:GOTO 20 


PROGRAMA PARA HACER UNA COPIA DELA PANTALLA 
(SCREEN 2/3) CON EL PLOTTER PRN-C41 DE SONY. 


18 
20 
30 
40 
s9 
69 
70 


EXXXK HARD-COPY ado 
PLOTTER PRN-C41 SONY 


SCREEN 2+SCREEN 3 


, 


89 COLOR 4,4 

390 LPRINT 

108 LPRINT CHRS(£H181+"4" 

110 FOR Y=8 TO 192 

128 FOR X=B TO 258 

130 IF POINT(X,Y)=4 THEN LPRINT"R3,0":60 
TO 169 

140 LPRINT"JB,3,3,0,08,-3,-3,0 
150 LPRINT"R3,8" 

168 NEXT x 

170 LPRINT"R-753,-3" 

1890 NEXT Y 


PROGRAMA PARA UTILIZAR CON EL PLOTTER PRN-C41 
DESONY: 'CIRCULO' 


19 ? XXX PLOTTER PRN-C41 Xxx 
20” SONY 

39" € TR CUE 
40 LPRINT CHR$(27):"+" 

SO CERINTERTES. 129 

69 LPRINT"I' 

270 LPRINT"M8a, a" 

88 P=3.14159 

390 A=1:B=1 

100 FOR R=0 TO 360 STEP 5 
110 S=R-180xP 

120 SI=INTC(SINCAXSIK80) 
130 CO=INT(COS(BASIK8D) 
148 LPRINT"D":C0:",":SI 
150 NEXT 

168 LPRINT"RA,-125 

170 LPRINT"A" 


PROGRAMA PARA UTILIZAR CON EL PLOTTER PRN-C41 
DESONY: 'CUADRICULA' 


10 
20 
30 
48 
sa 
60 
29 
80 
30 
100 
118 
120 
130 
148 
159 
169 
179 
180 
190 
208 
210 
228 
230 
240 
259 
260 
270 


"O XXXk PLOTTER PRN-C91 X*kX*k 
Ñ SONY 

t CUADRICULA DE COLORES 
LPRINT 

LPRINT CHR$C27):"s" 
LPRINT"I":C=0 

FOR I=1 TO 28 

LPRINT"C" 
IF 1 MOD S5=0 THEN C=C+1 
IF C>3 THEN C=B 
LPRINT"J198,0" 
LPRINT"RA,-S” 
LPRINT"J-198,08" 
LPRINT"RO,-S5' 

NEXT 

LPRINT"RA,S" 

FOR I=1 TO 28 
LPRINT"C"5C 

IF 1 MOD 5=B THEN C=C+1 
IF C>3 THEN C=8 

LPRINT" JO, 198" 
LPRINT"RS,0" 
LPRINT"JO,-198" 
LPRINT”RS,B" 

NEXT 

LPRINT:LPRINT 

LPRINT"a" 


JUEGO: LABERINTO 


SL 


=2 


6 CLEAR:RESTORE :COLOR 2,1,1 


19 
Y 
12 
13 
14 


"LABERINTO" 
CLS:SCREEN 1:PRINT:PRINT:PRINT:PRINT 
PRINT' h E 


A 
PRINT" | LABERINTO |" 
PRINT" a 


15 FOR I=1 TO 19008 

16 NEXT 1 

ZW ON ERROR GOTO 4729 

30 DEFINT A-2:DEF FNECX,Y)=((X=4X-1) AND 
(Y=UY-1)) 

40 DIM DX(3),DY(3):FOR I=8 TO 3:READ DX( 
1),DYC(1):NEXT 

50 DATA 2,0,9,2,-2,9,D,-2 

68 LOCATE 2,8: PRINT"NIVEL ? (1-3)”:A$=1 

NKEYS :L=UALCA$):IF LC1 OR L>3 GOTO 68 

20 FOR 1=1 TO L:READ WX:NEXT :wWY=4x 

88 DATA 5,8,12 

90 FOR 1=1 TO VALCRIGHTSCSTR$C(TIME),2)): 

X=RNDC1) ¿NEXT 

91 PRINT:PRINT:PRINT:PRINT 

100 PRINT"ESTAS EN UN LABERINTO. DEBES": 

PRINT:PRINT" BUSCAR LA SALIDA” :PRINT: 

PRINT:PRINT:PRINT" UTILIZA LOS CURSORES 
PARA" :PRINT:PRINT" MOVERTE POR LOS PAS 
ILLOS" ¿KX=UX+1 :kKY=4Y+1 UX=4UX*2 :WY=4YYx2 
119 DIM MCUWX, WY) 

120 FOR 1=8 TO WX:MC(B,1I)=1 :M(1,8)=1 :mMC 

UX, 1)=1:MC1,WY)=1 :NEXT 

130 C=(KX-2)I*(KY-2) :CA=C-4 

148 X=INTCRNDC1IXKXIX22Y=INTCURND(1IXKXIXk 

2 :1F M(X,Y)=9 GOTO 148 

159 GOSUB 269:1F C<CA THEN IF CN GOTO 1 

El2) 

169 IF C<>B GOTO 149 

179 ” JUEGO 

180 SCREEN 2:XM=1 :YM=1 :DR=9 

198 GOSUB 320 ”LINE 

200 IF FNECXM,YM) THEN OPEN "GRP:"FOR O 

UTPUT AS 41:PSETCSD, 10) :PRINTH1,"S AL I 
D A":GOSUB 5BB:FOR QU=1 TO 1580:NEXT QU 
¿SCREEN 1:LOCATE 1,19: PRINT HAS ENCA 

NTRADO LA SALIDA” :GOSUB 6YA 

2109 A=STICK(B):1F A=9 THEN 219 

228 A=(A-1)/2:DR=(DR + AJ MOD 4 

239 1F MCOXM+DXCORI+2, YM+DYCDRI-2) THEN D 

R=(DR+9-4) MOD 4:GOTO 219 

248 XM=XM+DXCDR) :vM=YM+DY (DR) 

258 GOTO 199 


ID 202 > suerurina 


279 RO=INTCRNDC1)X4):R=RQ 

280 IF MCX+DXCRI,Y+DY(RIJ=9 GOTO 398 

290 R=C(R+1)IMOD 4:1F RRA EAN 280 ELSE 
CN=B ¿RETURN 

308 MOX+DXCRI/Z, Y+DY [RI/ZIZ1 SMEX+DXCR) 5 Y 
=Y+DY (RI 

318 M(X,Y)=12:C=C-1 :CN=-1 ¿RETURN 

320 ELS 

330 X=XM:Y=YM:X0=128:YB=92:LX=128:LY=92 
340 UO=DXCDRI1+2 :UB=DY(DRI-2 

358 Ul=DX((DR+1) MOD 4)-2:U1=DY(CDR+1) M 
0D 4)+2:U2=DX(C(DR+3) MOD 4)-2:U2=DY((DR+ 
3) MOD 432 

360 IF M(X,Y) THEN IF.  FNECX-UB,Y-UB) GO 
TO 459 ELSE 469 

379 IF MCX+U1,Y+U1) THEN GOSUB 438 ELSE 
GOSUB 488 

389 LX=-LX:1F MCX+U2,Y+UZ) THEN GOSUB 43 
2 ELSE GOSUB 488 

399 LX=ABS(LXX.8):LY=LYX.8:%X=X+U0:Y=Y+UB 
¿GOTO 369 

499 LINECXB+LX, YO+LYI-CXD+LX, YO+LY) 

419 LINECXD+LX, YO+LYX. 8)-CXD+LXX. 8, YBD+LY 
*.8) 

420 LINE-CXB+LX*X.8,YB-LY*X.8):LINE -CXO+L 
%, YO-LYX.8) :RETURN 

430 LINECXD+LX, YO+LYI-CXB+LXR.8, YD+LYX.8 
J 

448 LINECXBD+LX, YO-LYI-CXD+LX*.B, YO-LYX.B 
) ¿RETURN 

450 LINECXB-LX, YO-LYI-CXB+LX, YB+LYI, ,BF: 
RETURN 

468 LINECXB-LX, YO-LYI-CXB+LX, YO+LYI, BR 
ETURN 

470 IF ERL=280 THEN 1F ERR=S OR ERR=3 TH 
EN RESUME 298 

480 ON ERROR GOTO A 

490 END 

509 FOR I=1 TO 3:PLAY"T2BB05L62GECGECGEC 
GECGECGEC" ¿NEXT 1:RETURN 

688 LOCATE 2,15:PRINT"QUIERES CONTINUARC 
S/N):":0$=INKEYS:IF As$="S"” THEN S ELSE 1 
F As="N"THEN END ELSE IF A$<>"S" OR A$<> 
"N" GOTO 698 


PROGRAMA PARA DIBUJAR CON LOS CURSORES 


70 
JAR 
80 
se 
on 
108 
119 
ion 
120 
130 
ta 
144 
158 
ma 
al 4 
178 
si 
189 
198 
200 
210 
E" 
220 
230 
240 
250 
260 
270 
280 
290 
308 
310 
CRH 
CHR 
320 


ON STOP GOSUB 25B:STOP ON 
CLs 
COLOR 1,15,15 
SCREEN 2,0 
OPEN "GRP:"FOR OUTPUT AS +1 


PRESET(172,1) 

PRINT +$1,"TECLAS DE COMANDO PARA DIBU 

PRESET(17,32) 

PRINTH1,"F1:PALETA DE COLORES(selecci 
con cursor)" 

PRESET(17?,56) 

PRINTR+1,"FZ:LINEAS (longitud y posic 
final con cursor) 

PRESET(17,80B) 

PRINTH1,"F3: CIRCUNFERENCIAS[forma y 
maño con cursor)" 

PRESET(17,104) 

PRINTH1,"F4:CUADRADOS COLOREADOS (fo 
y tamaño con cursor)" 

PRESET(17, 128) 

PRINT41, "FS:COLOR A SUPERFICIES(solo 
estan cerradas) 

PRESET(17, 152) 

PRINT+41,"F6:BORRADO DEL DIBUJO” 
PRESET(17,170) 

PRINTH1, "PARA EJECUTAR COMANDOS PULS 


PRESET(17,183) 

PRINTH1, "TECLA RETURN 

AS=INKEYS:IF A$=""THENZ240 

CLS 

COLOR 1,15,15 

SCREEN2 

FOR D=0T0299STEP16 

LINE(CD, 182)-(D+16,190),0-16,BF 

NEXTD 
SPRITES(1)=CHRSCELHBI+CHR$C(R.H10)+CHR$ 
10)+CHR$C(RH2CI+CHR$SCLH1D)+CHR$SCRH1B)+ 
$(RHO0I+CHRSCE8HO) 

c=0 


330 
pa 340 
350 
360 
de 370 
a la] 

380 


X=128:Y=96 

RUT "SPRITE: 3,:6X=3, Y 4D 101 

A$=INKEYS 

PSED CASO 

ON KEY GOSUB 6508,508,7808,9340,062B, 1089 


KEY(1)ON:KEYC2JON :KEY(3)0N:KEY(4)0N: 


> KEY(S)ON:KEYC(6JON 


a 390 
400 
410 
— 428 
430 
448 
hs 450 
468 
470 
7 480 
w 499 
ses 
2 s10 
u 520 
530 
540 
- 550 
569 
570 
ae 580 
e 598 
608 
0 619 
= 620 
630 
649 
650 
669 
678 
680 
690 
700 
ha 218 
720 
730 


IF A$="" THEN 340 

IF X=256 THEN X=X-1 

IF Y=186 THEN Y=Y-1 

IF X=0 THEN X=X+1 

IF Y=0 THEN Y=Y+1 

IF A$=CHR$(28) THEN X=X+1 
IF HR$(29) THEN 
IF. AS=CHR$(38) THEN 
IF A$S=CHR$(31) THEN Y=Y+1 
IF AS$=CHR$(84) THEN 698 
GOTO 348 

A=X:B=Y 

FSE E 

AS$=INKEYS 

IF A HRSC13ITHEN RETURN 
IF AsS=""THENS20 
LINECA,B)-(X,Y),15 

IF AS=CHR$(28)THENX=X+1 


=Y-1 

IF AS=CHR$(31)THENY=Y+1 
LINECA,B)-(X,Y),C 

GOTO 528 

O 

PAINTCX+2,Y+2),C 

RETURN 

N=D 

LINE(N, 186)-(N+16,192),1,8 
C=POINT(N+S, 198) 

A$=INKEYS 
IF A$="" THEN 680 

LINE(N, 186)-(N+16,1923,15,8 
IF AS=CHR$(13)THEN RETURN 
IFA HR$(28)THENN=N+16 

IF AS$=CHRS(29)THENN=N-16 


248 
7509 
7609 
770 
780 
798 
gun 
ABSC 
810 
820 
830 
840 
858 
868 
87 
880 
890 
300 
319 
329 
330 
348 
3958 
369 
3970 
389 
3990 
1000 
10109 
1020 
1839 
1098 
18509 
10609 
1970 
1980 
1990 


IF N=-16THENN=8 
IF N=256THENN=N-16 
LINE(CN, 186)-(N+16,192),1,B 
G0T0669 
F=X:G=Y 
A$=INKEYS 
A=ABSCF-X) :B=ABS(G-4):H=M+1:1]=B+1:T= 
T/H+.1) 
CIRCLECX,Y),A,C,,.T 
IF A$=""THEN290 
IF A$=CHRS(13)THEN RETURN 
CIRCLECA, IA 135 00d 
IF A$=CHR$(28)THENF=F+1 3 
IF A$=CHR$(29)THEN 03 
IF A$=CHR$(3B)THENI Le 
IF AS$=CHR$(31)THENG=G+1 
IF F=0 THENF=F+1 
IF F=255 THENF=F-1 
IF G=8 THENG=G+1 
IF G=185 THENG=G-1 
GOTO 798 
D=X:E=Y 
A$=INKEYS 
IF AS=CHR$(13)THEN RETURN 
IF A$=""THEN9S0O 
LINECD,E)-(X,Y),15,BF 
IF AS=CHR$(28)THENX=X+1 
IF A$S=CHR$(29)THENX=X-1 
IF HR$(3B)THENY=Y-=1 
IF AS$=CHR$(31)THENY=Y+1 
IF X=0 THENX=X+1 
IF X=255 THENX=X-1 
IF Y=0 THENY=Y+ 


D 


IF Y=185 THENY=Y-1 
LINECD,E)-CX,Y),C,BF 
GOTO 958 

GOTO 2508 


ANEXO 5: MENSAJES Y CODIGOS DE ERROR 


Código 
, 


Mensaje 
NEXT Without 
FOR 


Syntax error 


RETURN 
without 
GOSUB 


Outof DATA 


lllegal function 
call 


Explicación 

Existe un nombre de variable en una instrucción 
NEXT que no corresponde a la variable de lains- 
trucción FOR o no existe el NEXT. 


Una línea de programa contiene caracteres inco- 
rrectos (puntuación, parentesis no emparejados, 
error mecanográfico...) 


Se encontró una instrucción RETURN sin que se 
hubiera incorporado un comando GOSUB. GO- 
SUB no emparejado. 


Se efectuó una instrucción READ, pero no que- 
daban datos por leer en la instrucción DATA. 


Un parámetro fuera de gama se ha asignado a 

una función matemática o de STRING. Un lllegal 

function call puede ocurrir también como resul- 

tado de. 

1. Una instrucción errónea o excesivamente 
larga. 

2. Un argumento negativo o cero con LOG 

3. Un argumento negativo con SQR 

4. Un argumento impropio para MID $, LEFT $, 

RIGHT $, INP, OUT, PEEK, POKE, TAB, SPC, 

STRIN $, SPACE $, INSTR $ o ON... GOTO 


1 


14 


16 


Overflow 


Outof 
memory 


Undefined line 
number 


Subscript out 
ofrange 


Redimensioned 
array 


División by 
zero 


lllegal direct 


Type 
mismatch 


Outof string 
space 


String too long 


String formula 
too complex 


El resultado de un cálculo es demasiado largo 
para ser representado en el formato BASIC. 


Un programa es demasiado largo, tiene dema- 
siadas instrucciones, demasiados GOSUB, de- 
masiados FOR, demasiadas variables o expre- 
siones demasiado complejas. 


Una linea referenciada en un GOTO, GOSUB, 
IF... THEN... ELSE es una línea inexistente. 


Un elemento de la matriz está referenciado con 
una cifra fuera de las dimensiones de la matriz, o 
posee un número erróneo de subindices. 


Una matriz puede dimensionarse solo una vez, 
con DIM. Si se efectúan dos DIM para una misma 
matriz aparece este mensaje, si se usa una varia- 
ble de matriz antes de que ésta sea dimensio- 
nada, se ejecuta una operación DIM automática- 
mente dimensionándose en 10 elementos. Si se 
pretende dimensionar posteriormente, se gene- 
rará el mensaje de error citado. 


Al ser una operación sin sentido matemático 
aparece el mensaje de error. 


Una instrucción que solamente puede incorpo- 
rarse en un programa se ha introducido en 
Modo directo. 


Un número se ha asignado a una cadena o vice- 
versa; una función que esperaba un número re- 
cibe una cadena o viceversa. 


Unas variables string han sobrepasado la memo- 
ria disponible. El BASIC asignará dinamica- 
mente espacio para cadenas hasta que se ago- 
ten los recursos de memoria. 


Aparece este mensaje si se pretende abarcar en 
Una cadena más de 255 caracteres. 

La expresión de la cadena es demasiado larga o 
compleja. Debería dividirse al menos en dos par- 
tes para que pueda ser elaborada. 


dd 


( 


( 


20 


21 


22 


23 


24 


25 


51 


52 


Can't continue. 


Undefined 
user function 


Device 1/0 
error 


Verify error 


NO RESUME 


RESUME 
without error 


Unprintable 
error 


Missing 
operand 


Line buffer 
overflow 


Field overflow 


Internal error 


Bad file 
number 


El programa no puede continuar porque 
1, Se ha producido un error. 


2. se ha modificado durante una interrupción de 
su ejecución. 
3. No existe 


Se usó como referencia una función definida por 
el usuario, pero la misma no había sido definida 
usando la instrucción DEF FN. 


Error al conectar cassette, impresora, pantalla. 
Es un error fatal ya que el programa no puede 
recuperarse. 


El programa actual es distinto del grabado en 
cassette. (Grabación incorrecta) 


Se ha entrado una rutina de tratamiento de erro- 
res, pero no hay ninguna instrucción RESUME. 


Se encuentra una instrucción RESUME antes de 
que se haya entrado en una rutina de tratamiento 
de errores. 


No hay mensaje de error por la condición de 
error que se da. Usualmente es el caso de una 
instruction ERROR con un código de error no 
definido. 


Una expresión contiene un operador no seguido 
de operando. 


Se ha entrado una linea con demasiados carac- 
teres. 


Estos códigos no tienen definición. Se reservan 
para futuras expansiones del BASIC. 


Una instrucción FIELD intentó colocar más bytes 
de los especificados para la longitud de registro 
de un fichero aleatorio. 


Se ha producido un funcionamiento defectuoso 
en el lenguaje BASIC. 


En una instrucción o comando se cita un número 
de fichero que no se ha abierto anteriormente o 
que está fuera de la gama de número de fichero 
especificados en la instrucción MAXFILES. 


53 


54 


55 


56 


57 


58 


59 


60-255 


File not found 


File already 
open 


Input pastend 


Bad file name 


Direct 
statement in 
file 


Secuential 1/O 
only 


File not open... 


En una instrucción LOAD, OPEN o KILL se cita 
un fichero que no existe en la memoria. 


Se ha encontrado una instrucción de salida para 
un fichero que ya estaba abierto, o se ha entrado 
un comando KILL para un fichero que está 
abierto. 


Se ha ejecutado una instrucción INPUT tras ha- 
berse entrado todos los datos en el fichero o a 
partir de un fichero nulo. Para evitar este error 
usar la función EOF, para detectar el final del 
fichero. 


Se ha usado una forma ¡legal de nombre de fi- 
chero p.e.: LOAD, SAVE, KILL, NAME, etc. 


Se encuentra una instrucción directa al cargar 
con LOAD un fichero en formato ASCii. La ejecu- 
ción de LOAD se ha interrumpido. 


Una instrucción de acceso aleatorio es utilizada 
para un fichero secuencial. 


El fichero designado con PRINT +, INPUT +, etc. 
no se ha abierto. 


Estos códigos no tienen definición. El usuario 
puede crear su propio código de errores dentro 
de esta secuencia. 


LKADAD AAA AAA ALAAAALADANAAA ANA AAAARANAANS 


BI III III 7999941733 3999)9 


III 799000 


